Migdal et al, Equation (64)

Time bar (total: 11.0s)

analyze0.0ms (0%)

Memory
0.9MiB live, 0.9MiB allocated
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.5s (13.4%)

Memory
-5.0MiB live, 1 258.4MiB allocated
Samples
1.2s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 788.0ms
ival-cos: 340.0ms (43.2% of total)
ival-mult: 246.0ms (31.2% of total)
ival-div: 83.0ms (10.5% of total)
ival-sqrt: 70.0ms (8.9% of total)
ival-add: 33.0ms (4.2% of total)
ival-true: 6.0ms (0.8% of total)
exact: 6.0ms (0.8% of total)
ival-assert: 4.0ms (0.5% of total)
Bogosity

preprocess163.0ms (1.5%)

Memory
28.3MiB live, 68.2MiB allocated
Algorithm
2×egg-herbie
Rules
1 522×times-frac
1 460×unsub-neg
1 254×distribute-lft-in
1 236×distribute-rgt-in
930×div-sub
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
041133
1130133
2375133
31018133
42412133
54779133
65679133
76481133
86555133
96571133
106742133
116860133
126872133
136872133
146872133
157996133
01213
12513
25013
38013
49213
09212
Stop Event
1×iter limit
1×saturated
1×node limit
Calls
Call 1
Inputs
(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
Outputs
(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
Call 2
Inputs
(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
(+ (* (/ (cos th) (sqrt 2)) (* (neg a1) (neg a1))) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* (neg a2) (neg a2))))
(+ (* (/ (cos (neg th)) (sqrt 2)) (* a1 a1)) (* (/ (cos (neg th)) (sqrt 2)) (* a2 a2)))
(neg (+ (* (/ (cos th) (sqrt 2)) (* (neg a1) (neg a1))) (* (/ (cos th) (sqrt 2)) (* a2 a2))))
(neg (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* (neg a2) (neg a2)))))
(neg (+ (* (/ (cos (neg th)) (sqrt 2)) (* a1 a1)) (* (/ (cos (neg th)) (sqrt 2)) (* a2 a2))))
(+ (* (/ (cos th) (sqrt 2)) (* a2 a2)) (* (/ (cos th) (sqrt 2)) (* a1 a1)))
(+ (* (/ (cos a1) (sqrt 2)) (* th th)) (* (/ (cos a1) (sqrt 2)) (* a2 a2)))
(+ (* (/ (cos a2) (sqrt 2)) (* a1 a1)) (* (/ (cos a2) (sqrt 2)) (* th th)))
Outputs
(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
(/ (* (cos th) (+ (* a1 a1) (* a2 a2))) (sqrt 2))
(+ (* (/ (cos th) (sqrt 2)) (* (neg a1) (neg a1))) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
(/ (* (cos th) (+ (* a1 a1) (* a2 a2))) (sqrt 2))
(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* (neg a2) (neg a2))))
(/ (* (cos th) (+ (* a1 a1) (* a2 a2))) (sqrt 2))
(+ (* (/ (cos (neg th)) (sqrt 2)) (* a1 a1)) (* (/ (cos (neg th)) (sqrt 2)) (* a2 a2)))
(/ (* (cos th) (+ (* a1 a1) (* a2 a2))) (sqrt 2))
(neg (+ (* (/ (cos th) (sqrt 2)) (* (neg a1) (neg a1))) (* (/ (cos th) (sqrt 2)) (* a2 a2))))
(/ (* (cos th) (+ (* a1 a1) (* a2 a2))) (neg (sqrt 2)))
(neg (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* (neg a2) (neg a2)))))
(/ (* (cos th) (+ (* a1 a1) (* a2 a2))) (neg (sqrt 2)))
(neg (+ (* (/ (cos (neg th)) (sqrt 2)) (* a1 a1)) (* (/ (cos (neg th)) (sqrt 2)) (* a2 a2))))
(/ (* (cos th) (+ (* a1 a1) (* a2 a2))) (neg (sqrt 2)))
(+ (* (/ (cos th) (sqrt 2)) (* a2 a2)) (* (/ (cos th) (sqrt 2)) (* a1 a1)))
(/ (* (cos th) (+ (* a1 a1) (* a2 a2))) (sqrt 2))
(+ (* (/ (cos a1) (sqrt 2)) (* th th)) (* (/ (cos a1) (sqrt 2)) (* a2 a2)))
(* (cos a1) (/ (+ (* a2 a2) (* th th)) (sqrt 2)))
(+ (* (/ (cos a2) (sqrt 2)) (* a1 a1)) (* (/ (cos a2) (sqrt 2)) (* th th)))
(* (cos a2) (/ (+ (* a1 a1) (* th th)) (sqrt 2)))
Symmetry

(abs a1)

(abs a2)

(abs th)

(sort a1 a2)

explain235.0ms (2.1%)

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

Compiled 160 to 52 computations (67.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 34.0ms
ival-cos: 11.0ms (32.6% of total)
ival-mult: 11.0ms (32.6% of total)
ival-sqrt: 5.0ms (14.8% of total)
ival-div: 3.0ms (8.9% of total)
ival-add: 2.0ms (5.9% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

eval0.0ms (0%)

Memory
0.4MiB live, 0.4MiB allocated
Compiler

Compiled 3 to 3 computations (0% saved)

prune1.0ms (0%)

Memory
1.7MiB live, 1.7MiB allocated
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 22 to 12 computations (45.5% saved)

simplify13.0ms (0.1%)

Memory
-16.5MiB live, 22.2MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(cos.f64 th)
✓cost-diff0
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
✓cost-diff13056
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
Rules
100×*-lowering-*.f32
100×*-lowering-*.f64
60×accelerator-lowering-fma.f32
60×accelerator-lowering-fma.f64
48×*-commutative
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01250
12550
25050
38050
49250
09249
Stop Event
1×iter limit
1×saturated
Calls
Call 1
Inputs
(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
(* (/ (cos th) (sqrt 2)) (* a1 a1))
(/ (cos th) (sqrt 2))
(cos th)
th
(sqrt 2)
2
(* a1 a1)
a1
(* (/ (cos th) (sqrt 2)) (* a2 a2))
(* a2 a2)
a2
Outputs
(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(* (/ (cos th) (sqrt 2)) (* a1 a1))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(cos th)
(cos.f64 th)
th
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(* a1 a1)
(*.f64 a1 a1)
a1
(* (/ (cos th) (sqrt 2)) (* a2 a2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(* a2 a2)
(*.f64 a2 a2)
a2

localize44.0ms (0.4%)

Memory
0.9MiB live, 118.5MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
✓accuracy100.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)))
✓accuracy99.7%
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
✓accuracy99.6%
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
✓accuracy98.9%
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
Samples
31.0ms256×0valid
Compiler

Compiled 58 to 14 computations (75.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 19.0ms
ival-mult: 9.0ms (46.5% of total)
ival-cos: 6.0ms (31% of total)
ival-div: 2.0ms (10.3% of total)
ival-sqrt: 2.0ms (10.3% of total)
ival-add: 1.0ms (5.2% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series17.0ms (0.2%)

Memory
-3.2MiB live, 35.4MiB allocated
Counts
5 → 108
Calls
Call 1
Inputs
#<alt (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))>
#<alt (* (/ (cos th) (sqrt 2)) (* a1 a1))>
#<alt (/ (cos th) (sqrt 2))>
#<alt (cos th)>
#<alt (* (/ (cos th) (sqrt 2)) (* a2 a2))>
Outputs
#<alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a1 2) (sqrt 2))))))) (/ (pow a1 2) (sqrt 2)))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (/ 1 (sqrt 2))>
#<alt (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))>
#<alt (+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))>
#<alt (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))>
#<alt (/ (cos th) (sqrt 2))>
#<alt (/ (cos th) (sqrt 2))>
#<alt (/ (cos th) (sqrt 2))>
#<alt (/ (cos th) (sqrt 2))>
#<alt (/ (cos th) (sqrt 2))>
#<alt (/ (cos th) (sqrt 2))>
#<alt (/ (cos th) (sqrt 2))>
#<alt (/ (cos th) (sqrt 2))>
#<alt 1>
#<alt (+ 1 (* -1/2 (pow th 2)))>
#<alt (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))>
#<alt (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2))))))) (/ (pow a2 2) (sqrt 2)))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
Calls

27 calls:

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

rewrite353.0ms (3.2%)

Memory
8.8MiB live, 816.5MiB allocated
Algorithm
1×batch-egg-rewrite
Rules
6 176×accelerator-lowering-fma.f32
6 176×accelerator-lowering-fma.f64
4 662×*-lowering-*.f32
4 662×*-lowering-*.f64
2 804×/-lowering-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01238
15038
240338
3732138
0842437
Stop Event
1×iter limit
1×node limit
Counts
5 → 327
Calls
Call 1
Inputs
(+ (* (/ (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))
Outputs
(+.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(+.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(+.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(-.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) a1 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (*.f64 a1 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)))) (/.f64 a1 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (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 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #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 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal -1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal -1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(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 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (*.f64 a1 a1) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))) #s(literal 2 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(neg.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(neg.f64 (/.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (+.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (+.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))))
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 9 binary64)) (pow.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 9 binary64))) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 3 binary64)) #s(literal 8 binary64)) (-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))))
(/.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 3 binary64)) #s(literal 8 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 3 binary64)) #s(literal 8 binary64))) (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 3 binary64)) #s(literal 8 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 3 binary64)) #s(literal 8 binary64))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (/.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal 1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 9 binary64)) (pow.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 9 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 3 binary64)) #s(literal 8 binary64)) (-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 3 binary64)) #s(literal 8 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 3 binary64)) #s(literal 8 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 3 binary64)) #s(literal 8 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 3 binary64)) #s(literal 8 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (cos.f64 th)) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal -1 binary64)) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (cos.f64 th)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (neg.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (neg.f64 (/.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) #s(literal 1 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 9 binary64)) (pow.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 9 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 3 binary64)) #s(literal 8 binary64)) (-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))
(/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 3 binary64)) #s(literal 8 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 3 binary64)) #s(literal 8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (*.f64 (/.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (*.f64 (-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 3 binary64)) #s(literal 8 binary64)) (/.f64 (pow.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 3 binary64)) #s(literal 8 binary64))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) #s(literal -1 binary64))
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #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 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (+.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) #s(literal 1/2 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (/.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal -1 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (+.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 3 binary64)) #s(literal 8 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 3 binary64)))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64))))))
(*.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 2 binary64)))) (-.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 (/.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))) #s(literal 2 binary64))
(*.f64 (/.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))) #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #s(literal 1 binary64)))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))
(/.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 a1 a1) #s(literal -1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (/.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #s(literal -1 binary64))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(*.f64 a1 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal -1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 a1 a1) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (/.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -1 binary64))
(*.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (cos.f64 th))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -1/2 binary64)))
(cos.f64 th)
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (cos.f64 th) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 th))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(neg.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal 1 binary64)))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1 binary64))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2)
(*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 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 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal -1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (/.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))

simplify725.0ms (6.6%)

Memory
-0.5MiB live, 1 801.7MiB allocated
Algorithm
1×egg-herbie
Rules
34 694×accelerator-lowering-fma.f32
34 694×accelerator-lowering-fma.f64
6 426×*-lowering-*.f32
6 426×*-lowering-*.f64
4 620×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

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

eval55.0ms (0.5%)

Memory
-3.3MiB live, 154.0MiB allocated
Compiler

Compiled 15 196 to 1 056 computations (93.1% saved)

prune61.0ms (0.6%)

Memory
13.0MiB live, 171.7MiB allocated
Pruning

7 alts after pruning (7 fresh and 0 done)

PrunedKeptTotal
New4837490
Fresh000
Picked101
Done000
Total4847491
Accuracy
100.0%
Counts
491 → 7
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶99.6%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
▶99.0%
(/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
▶99.6%
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
99.6%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
99.6%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
▶99.6%
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
▶99.5%
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
Compiler

Compiled 224 to 158 computations (29.5% saved)

simplify10.0ms (0.1%)

Memory
-20.1MiB live, 18.7MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(*.f64 a2 a2)
✓cost-diff0
(*.f64 a1 a1)
✓cost-diff0
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
✓cost-diff0
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
✓cost-diff0
(*.f64 a1 a1)
✓cost-diff0
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
✓cost-diff0
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
✓cost-diff0
(sqrt.f64 #s(literal 2 binary64))
✓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 (*.f64 a1 a1) (*.f64 a2 a2)))
✓cost-diff0
(cos.f64 th)
✓cost-diff0
(*.f64 a2 a2)
✓cost-diff0
(*.f64 (*.f64 a2 a2) (cos.f64 th))
✓cost-diff0
(/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
✓cost-diff0
(cos.f64 th)
✓cost-diff0
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
✓cost-diff0
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
Rules
100×*-lowering-*.f32
100×*-lowering-*.f64
60×accelerator-lowering-fma.f32
60×accelerator-lowering-fma.f64
44×*-commutative
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
019191
138191
265191
379191
494191
5101191
0101181
Stop Event
1×iter limit
1×saturated
Calls
Call 1
Inputs
(/ (* (cos th) (+ (* a1 a1) (* a2 a2))) (sqrt 2))
(* (cos th) (+ (* a1 a1) (* a2 a2)))
(cos th)
th
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
a1
(* a2 a2)
a2
(sqrt 2)
2
(/ (* (* a2 a2) (cos th)) (sqrt 2))
(* (* a2 a2) (cos th))
(* a2 a2)
a2
(cos th)
th
(sqrt 2)
2
(* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2)))
(/ (cos th) (sqrt 2))
(cos th)
th
(sqrt 2)
2
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
a1
(* a2 a2)
a2
(* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th))
(/ (+ (* a1 a1) (* a2 a2)) (sqrt 2))
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
a1
(* a2 a2)
a2
(sqrt 2)
2
(cos th)
th
(/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th)))
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
a1
(* a2 a2)
a2
(/ (sqrt 2) (cos th))
(sqrt 2)
2
(cos th)
th
Outputs
(/ (* (cos th) (+ (* a1 a1) (* a2 a2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (cos th) (+ (* a1 a1) (* a2 a2)))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(cos th)
(cos.f64 th)
th
(+ (* a1 a1) (* a2 a2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* a1 a1)
(*.f64 a1 a1)
a1
(* a2 a2)
(*.f64 a2 a2)
a2
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(/ (* (* a2 a2) (cos th)) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(* (* a2 a2) (cos th))
(*.f64 (cos.f64 th) (*.f64 a2 a2))
(* a2 a2)
(*.f64 a2 a2)
a2
(cos th)
(cos.f64 th)
th
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(cos th)
(cos.f64 th)
th
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(+ (* a1 a1) (* a2 a2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* a1 a1)
(*.f64 a1 a1)
a1
(* a2 a2)
(*.f64 a2 a2)
a2
(* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (+ (* a1 a1) (* a2 a2)) (sqrt 2))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* a1 a1) (* a2 a2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* a1 a1)
(*.f64 a1 a1)
a1
(* a2 a2)
(*.f64 a2 a2)
a2
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(cos th)
(cos.f64 th)
th
(/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (* a1 a1) (* a2 a2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* a1 a1)
(*.f64 a1 a1)
a1
(* a2 a2)
(*.f64 a2 a2)
a2
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(cos th)
(cos.f64 th)
th

localize97.0ms (0.9%)

Memory
23.9MiB live, 219.3MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy100.0%
(cos.f64 th)
✓accuracy99.7%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
✓accuracy99.6%
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy100.0%
(cos.f64 th)
✓accuracy99.9%
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
✓accuracy99.7%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy100.0%
(cos.f64 th)
✓accuracy99.7%
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
✓accuracy98.9%
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy100.0%
(cos.f64 th)
✓accuracy99.9%
(*.f64 (*.f64 a2 a2) (cos.f64 th))
✓accuracy99.6%
(/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy100.0%
(cos.f64 th)
✓accuracy99.9%
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
✓accuracy99.6%
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
Samples
51.0ms256×0valid
Compiler

Compiled 193 to 21 computations (89.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 31.0ms
ival-div: 10.0ms (31.8% of total)
ival-mult: 10.0ms (31.8% of total)
ival-cos: 6.0ms (19.1% of total)
ival-sqrt: 4.0ms (12.7% of total)
ival-add: 1.0ms (3.2% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)

series17.0ms (0.2%)

Memory
-2.8MiB live, 35.6MiB allocated
Counts
15 → 336
Calls
Call 1
Inputs
#<alt (/ (* (cos th) (+ (* a1 a1) (* a2 a2))) (sqrt 2))>
#<alt (* (cos th) (+ (* a1 a1) (* a2 a2)))>
#<alt (cos th)>
#<alt (+ (* a1 a1) (* a2 a2))>
#<alt (/ (* (* a2 a2) (cos th)) (sqrt 2))>
#<alt (* (* a2 a2) (cos th))>
#<alt (* a2 a2)>
#<alt (* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2)))>
#<alt (/ (cos th) (sqrt 2))>
#<alt (sqrt 2)>
#<alt (* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th))>
#<alt (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2))>
#<alt (* a1 a1)>
#<alt (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th)))>
#<alt (/ (sqrt 2) (cos th))>
Outputs
#<alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))>
#<alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (+ (pow a1 2) (pow a2 2))>
#<alt (+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))>
#<alt (* (cos th) (+ (pow a1 2) (pow a2 2)))>
#<alt (* (cos th) (+ (pow a1 2) (pow a2 2)))>
#<alt (* (cos th) (+ (pow a1 2) (pow a2 2)))>
#<alt (* (cos th) (+ (pow a1 2) (pow a2 2)))>
#<alt (* (cos th) (+ (pow a1 2) (pow a2 2)))>
#<alt (* (cos th) (+ (pow a1 2) (pow a2 2)))>
#<alt (* (cos th) (+ (pow a1 2) (pow a2 2)))>
#<alt (* (cos th) (+ (pow a1 2) (pow a2 2)))>
#<alt (* (pow a2 2) (cos th))>
#<alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))>
#<alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))>
#<alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))>
#<alt (* (pow a1 2) (cos th))>
#<alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))>
#<alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))>
#<alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))>
#<alt (* (pow a1 2) (cos th))>
#<alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))>
#<alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))>
#<alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))>
#<alt (* (pow a1 2) (cos th))>
#<alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))>
#<alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))>
#<alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))>
#<alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))>
#<alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))>
#<alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))>
#<alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))>
#<alt 1>
#<alt (+ 1 (* -1/2 (pow th 2)))>
#<alt (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))>
#<alt (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (pow a2 2)>
#<alt (+ (pow a1 2) (pow a2 2))>
#<alt (+ (pow a1 2) (pow a2 2))>
#<alt (+ (pow a1 2) (pow a2 2))>
#<alt (pow a1 2)>
#<alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt (pow a1 2)>
#<alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt (pow a1 2)>
#<alt (+ (pow a1 2) (pow a2 2))>
#<alt (+ (pow a1 2) (pow a2 2))>
#<alt (+ (pow a1 2) (pow a2 2))>
#<alt (pow a2 2)>
#<alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))>
#<alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))>
#<alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))>
#<alt (pow a2 2)>
#<alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))>
#<alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))>
#<alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2))))))) (/ (pow a2 2) (sqrt 2)))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (pow a2 2)>
#<alt (+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* 1/24 (* (pow a2 2) (pow th 2))))) (pow a2 2))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* (pow th 2) (+ (* -1/720 (* (pow a2 2) (pow th 2))) (* 1/24 (pow a2 2)))))) (pow a2 2))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))>
#<alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (/ 1 (sqrt 2))>
#<alt (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))>
#<alt (+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))>
#<alt (+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))>
#<alt (/ (cos th) (sqrt 2))>
#<alt (/ (cos th) (sqrt 2))>
#<alt (/ (cos th) (sqrt 2))>
#<alt (/ (cos th) (sqrt 2))>
#<alt (/ (cos th) (sqrt 2))>
#<alt (/ (cos th) (sqrt 2))>
#<alt (/ (cos th) (sqrt 2))>
#<alt (/ (cos th) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))>
#<alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))>
#<alt (/ (* (pow a1 2) (cos th)) (sqrt 2))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))>
#<alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))>
#<alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))>
#<alt (sqrt 2)>
#<alt (+ (sqrt 2) (* 1/2 (* (pow th 2) (sqrt 2))))>
#<alt (+ (sqrt 2) (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2)))))>
#<alt (+ (sqrt 2) (* (pow th 2) (- (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/720 (sqrt 2)) (+ (* 1/48 (sqrt 2)) (* 1/2 (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2)))))))) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2)))))>
#<alt (/ (sqrt 2) (cos th))>
#<alt (/ (sqrt 2) (cos th))>
#<alt (/ (sqrt 2) (cos th))>
#<alt (/ (sqrt 2) (cos th))>
#<alt (/ (sqrt 2) (cos th))>
#<alt (/ (sqrt 2) (cos th))>
#<alt (/ (sqrt 2) (cos th))>
#<alt (/ (sqrt 2) (cos th))>
Calls

84 calls:

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

rewrite438.0ms (4%)

Memory
-13.8MiB live, 981.8MiB allocated
Algorithm
1×batch-egg-rewrite
Rules
4 368×*-lowering-*.f32
4 368×*-lowering-*.f64
3 314×accelerator-lowering-fma.f32
3 314×accelerator-lowering-fma.f64
3 254×/-lowering-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
019114
185114
2610114
37208114
08015107
Stop Event
1×iter limit
1×node limit
Counts
15 → 2 178
Calls
Call 1
Inputs
(/ (* (cos th) (+ (* a1 a1) (* a2 a2))) (sqrt 2))
(* (cos th) (+ (* a1 a1) (* a2 a2)))
(cos th)
(+ (* a1 a1) (* a2 a2))
(/ (* (* a2 a2) (cos th)) (sqrt 2))
(* (* a2 a2) (cos th))
(* a2 a2)
(* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2)))
(/ (cos th) (sqrt 2))
(sqrt 2)
(* (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)) (cos th))
(/ (+ (* a1 a1) (* a2 a2)) (sqrt 2))
(* a1 a1)
(/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th)))
(/ (sqrt 2) (cos th))
Outputs
(+.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64)))
(-.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 th) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 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 (*.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 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 a2 a2)) #s(literal -1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 a2 a2)) #s(literal -1 binary64)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (cos.f64 th) a2) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) a2) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (/.f64 (*.f64 (cos.f64 th) a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (/.f64 (*.f64 (cos.f64 th) a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) a1) (*.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.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 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a2 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a2 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 a2 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 a2 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 #s(literal 1 binary64)) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 #s(literal 1 binary64)) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) a2) #s(literal -1 binary64)) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) a2) #s(literal -1 binary64)) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 a1 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 #s(literal 1 binary64)) (/.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 (/.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 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (cos.f64 th) 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 a1 a1) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 1 binary64) a2) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 #s(literal 1 binary64) a2) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2) (*.f64 (cos.f64 th) a2) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2) (*.f64 (cos.f64 th) a2) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 a1 a1) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (cos.f64 th) a2) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (cos.f64 th) a2) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64))) (+.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))))
(/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 a1 a1))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (cos.f64 th)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal -1 binary64)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) #s(literal -1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (neg.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (-.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64)))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 a1 a2)) (-.f64 a1 a2))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64))
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 1 binary64))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a1 a2)) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a1 a2)))
(*.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.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 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a1 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (cos.f64 th))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)) (cos.f64 th))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(+.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(+.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(+.f64 (neg.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(-.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (cos.f64 th) (*.f64 a1 a1) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(fma.f64 (cos.f64 th) (*.f64 a2 a2) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(fma.f64 (cos.f64 th) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(fma.f64 a1 (*.f64 (cos.f64 th) a1) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(fma.f64 (*.f64 a1 a1) (cos.f64 th) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(fma.f64 a2 (*.f64 (cos.f64 th) a2) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(fma.f64 a2 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(fma.f64 a2 (*.f64 (*.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(fma.f64 (*.f64 a2 a2) (cos.f64 th) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 1 binary64) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(fma.f64 (*.f64 (cos.f64 th) a2) (*.f64 a2 #s(literal 1 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(fma.f64 (*.f64 (cos.f64 th) a1) a1 (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(fma.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (cos.f64 th) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(fma.f64 (neg.f64 (-.f64 #s(literal 0 binary64) a2)) (*.f64 (cos.f64 th) a2) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(neg.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (cos.f64 th)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) #s(literal 1 binary64)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th)))))) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 a1 a2)) (-.f64 a1 a2))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(*.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (cos.f64 th)))
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 th)))
(*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a1 a2)) (/.f64 (cos.f64 th) (-.f64 a1 a2)))
(*.f64 (/.f64 (cos.f64 th) (+.f64 a1 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(cos.f64 th)
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(/.f64 (cos.f64 th) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(*.f64 (cos.f64 th) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 th))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(+.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(+.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(-.f64 #s(literal 0 binary64) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)) (/.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)))
(-.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 a1 (*.f64 a1 #s(literal 1 binary64)) (*.f64 a2 a2))
(fma.f64 a1 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (*.f64 a1 a1) #s(literal 1 binary64) (*.f64 a2 a2))
(fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 a2 a2 (*.f64 a1 a1))
(fma.f64 a2 (*.f64 a2 #s(literal 1 binary64)) (*.f64 a1 a1))
(fma.f64 (*.f64 a2 a2) #s(literal 1 binary64) (*.f64 a1 a1))
(fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 #s(literal 1 binary64) (*.f64 a1 a1) (*.f64 a2 a2))
(fma.f64 #s(literal 1 binary64) (*.f64 a2 a2) (*.f64 a1 a1))
(fma.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 a1 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 a1 a1))
(fma.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)) (*.f64 a2 a2))
(fma.f64 (/.f64 a1 (+.f64 a1 a2)) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (-.f64 a1 a2)) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (+.f64 a1 a2)) (/.f64 (*.f64 a1 a1) (-.f64 a1 a2)) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (+.f64 a1 a2)) (/.f64 a1 (-.f64 a1 a2)) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (*.f64 #s(literal 1 binary64) a1) a1 (*.f64 a2 a2))
(fma.f64 (*.f64 #s(literal 1 binary64) a2) a2 (*.f64 a1 a1))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(neg.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64))
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) #s(literal -1 binary64))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))))
(/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal 1 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (neg.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a1 a2)) (-.f64 a1 a2))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (+.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) #s(literal 1 binary64)))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) #s(literal 1 binary64)))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)))
(*.f64 #s(literal -1 binary64) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 a1 a2)) (+.f64 a1 a2))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 a2 a2)))
(/.f64 #s(literal -1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (*.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(/.f64 (/.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1 binary64))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 a2 a2)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 th) a2) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 0 binary64) a2) (/.f64 (*.f64 (cos.f64 th) a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2)
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 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 (*.f64 (cos.f64 th) 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 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 (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) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a2 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a2 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a2 (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 a2 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 a2 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 a2 #s(literal 1 binary64)) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) a2) #s(literal -1 binary64)) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (*.f64 #s(literal 1 binary64) a2) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2) (*.f64 (cos.f64 th) a2))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (cos.f64 th) a2))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(neg.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(*.f64 (cos.f64 th) (*.f64 a2 a2))
(*.f64 (cos.f64 th) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(*.f64 a2 (*.f64 (cos.f64 th) a2))
(*.f64 a2 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2))))
(*.f64 a2 (*.f64 (*.f64 (cos.f64 th) a2) #s(literal 1 binary64)))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(*.f64 (*.f64 (cos.f64 th) a2) a2)
(*.f64 (*.f64 (cos.f64 th) a2) (*.f64 a2 #s(literal 1 binary64)))
(*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (-.f64 #s(literal 0 binary64) a2) (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)))
(*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (cos.f64 th))
(*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) a2)) (*.f64 (cos.f64 th) a2))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a2)))
(pow.f64 a2 #s(literal 2 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 a2)) #s(literal 2 binary64))
(*.f64 a2 a2)
(*.f64 a2 (*.f64 a2 #s(literal 1 binary64)))
(*.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 a2 a2))
(*.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)))
(*.f64 (*.f64 #s(literal 1 binary64) a2) a2)
(+.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64)))
(-.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 th) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 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 (*.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 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 a2 a2)) #s(literal -1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 a2 a2)) #s(literal -1 binary64)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (cos.f64 th) a2) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) a2) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (/.f64 (*.f64 (cos.f64 th) a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (/.f64 (*.f64 (cos.f64 th) a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) a1) (*.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.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 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a2 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a2 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 a2 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 a2 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 #s(literal 1 binary64)) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 #s(literal 1 binary64)) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) a2) #s(literal -1 binary64)) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) a2) #s(literal -1 binary64)) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 a1 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 #s(literal 1 binary64)) (/.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 (/.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 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (cos.f64 th) 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 a1 a1) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 1 binary64) a2) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 #s(literal 1 binary64) a2) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2) (*.f64 (cos.f64 th) a2) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2) (*.f64 (cos.f64 th) a2) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 a1 a1) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (cos.f64 th) a2) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (cos.f64 th) a2) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64))) (+.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))))
(/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 a1 a1))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (cos.f64 th)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal -1 binary64)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) #s(literal -1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (neg.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (-.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64)))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 a1 a2)) (-.f64 a1 a2))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64))
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 1 binary64))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a1 a2)) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a1 a2)))
(*.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.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 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a1 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (cos.f64 th))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)) (cos.f64 th))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64))
(/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -1 binary64))
(*.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (cos.f64 th) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (cos.f64 th))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) (cos.f64 th)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal -1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (cos.f64 th)) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (cos.f64 th))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)) (cos.f64 th))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(sqrt.f64 #s(literal 2 binary64))
(neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64)))
(-.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 th) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 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 (*.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 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 a2 a2)) #s(literal -1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 a2 a2)) #s(literal -1 binary64)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (cos.f64 th) a2) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) a2) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (/.f64 (*.f64 (cos.f64 th) a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (/.f64 (*.f64 (cos.f64 th) a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) a1) (*.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.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 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a2 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a2 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 a2 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 a2 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 #s(literal 1 binary64)) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 #s(literal 1 binary64)) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) a2) #s(literal -1 binary64)) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) a2) #s(literal -1 binary64)) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 a1 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 #s(literal 1 binary64)) (/.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 (/.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 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (cos.f64 th) 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 a1 a1) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 1 binary64) a2) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 #s(literal 1 binary64) a2) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2) (*.f64 (cos.f64 th) a2) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2) (*.f64 (cos.f64 th) a2) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 a1 a1) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (cos.f64 th) a2) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (cos.f64 th) a2) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64))) (+.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))))
(/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 a1 a1))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (cos.f64 th)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal -1 binary64)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) #s(literal -1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (neg.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (-.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64)))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 a1 a2)) (-.f64 a1 a2))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64))
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 1 binary64))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a1 a2)) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a1 a2)))
(*.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.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 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a1 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (cos.f64 th))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)) (cos.f64 th))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a2 (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 a1) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a1) a1 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2) a2 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))))
(/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal -1 binary64)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a1 a2)) (-.f64 a1 a2))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a1 a2)) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 a1 a2)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a1)))
(pow.f64 a1 #s(literal 2 binary64))
(pow.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 a1)) #s(literal 2 binary64))
(*.f64 a1 a1)
(*.f64 a1 (*.f64 a1 #s(literal 1 binary64)))
(*.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 a1 a1))
(*.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)))
(*.f64 (*.f64 #s(literal 1 binary64) a1) a1)
(+.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64)))
(-.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (cos.f64 th) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 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 (*.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 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 a2 a2)) #s(literal -1 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 a2 a2)) #s(literal -1 binary64)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (cos.f64 th) a2) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) a2) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 (*.f64 (cos.f64 th) a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (/.f64 (*.f64 (cos.f64 th) a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (/.f64 (*.f64 (cos.f64 th) a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) a1) (*.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.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 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a2 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a2 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 a2 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 a2 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a2 #s(literal 1 binary64)) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a2 #s(literal 1 binary64)) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) a2) #s(literal -1 binary64)) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) a2) #s(literal -1 binary64)) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 a1 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 a1 #s(literal 1 binary64)) (/.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 (/.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 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (cos.f64 th) 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 a1 a1) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 1 binary64) a2) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 #s(literal 1 binary64) a2) (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2) (*.f64 (cos.f64 th) a2) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2) (*.f64 (cos.f64 th) a2) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (*.f64 (*.f64 a1 a1) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (cos.f64 th) a2) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (cos.f64 th) a2) (*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64))) (+.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))))
(/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 a1 a1))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (cos.f64 th)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal -1 binary64)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) #s(literal -1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (neg.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (-.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64)))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) th))))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 a1 a2)) (-.f64 a1 a2))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64))
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 1 binary64))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))))))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a1 a2)) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a1 a2)))
(*.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.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 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a1 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (cos.f64 th))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)) (cos.f64 th))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) #s(literal 1 binary64)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(/.f64 #s(literal -1 binary64) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (/.f64 #s(literal -1 binary64) (cos.f64 th)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal 1 binary64)))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal -1 binary64) (cos.f64 th)) #s(literal 1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(*.f64 (/.f64 #s(literal -1 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal -1 binary64) (cos.f64 th)) (pow.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (cos.f64 th)) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (cos.f64 th)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (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 (/.f64 #s(literal -1 binary64) (cos.f64 th)) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))

simplify421.0ms (3.8%)

Memory
-3.4MiB live, 1 003.6MiB allocated
Algorithm
1×egg-herbie
Rules
13 734×accelerator-lowering-fma.f32
13 734×accelerator-lowering-fma.f64
5 392×*-lowering-*.f32
5 392×*-lowering-*.f64
2 790×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01703768
15433735
218953584
351923550
082573287
Stop Event
1×iter limit
1×node limit
Counts
336 → 336
Calls
Call 1
Inputs
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(+ (pow a1 2) (pow a2 2))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (pow a2 2) (cos th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(* (pow a1 2) (cos th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (cos th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (cos th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(* (pow a2 2) (cos th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (cos th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
1
(+ 1 (* -1/2 (pow th 2)))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(pow a2 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2))))))) (/ (pow a2 2) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(pow a2 2)
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* 1/24 (* (pow a2 2) (pow th 2))))) (pow a2 2))
(+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* (pow th 2) (+ (* -1/720 (* (pow a2 2) (pow th 2))) (* 1/24 (pow a2 2)))))) (pow a2 2))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ 1 (sqrt 2))
(+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))
(+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(sqrt 2)
(+ (sqrt 2) (* 1/2 (* (pow th 2) (sqrt 2))))
(+ (sqrt 2) (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2)))))
(+ (sqrt 2) (* (pow th 2) (- (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/720 (sqrt 2)) (+ (* 1/48 (sqrt 2)) (* 1/2 (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2)))))))) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2)))))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
Outputs
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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)))
(+.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 th th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))))))))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a1 2) (cos th))
(*.f64 (*.f64 a1 a1) (cos.f64 th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a1 2) (cos th))
(*.f64 (*.f64 a1 a1) (cos.f64 th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a1 2) (cos th))
(*.f64 (*.f64 a1 a1) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow th 2)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))))))
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 th th))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (sqrt.f64 #s(literal 2 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)))
(+.f64 (*.f64 (*.f64 th th) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 th th))) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(pow a2 2)
(*.f64 a2 a2)
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* 1/24 (* (pow a2 2) (pow th 2))))) (pow a2 2))
(+.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 th th))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* (pow th 2) (+ (* -1/720 (* (pow a2 2) (pow th 2))) (* 1/24 (pow a2 2)))))) (pow a2 2))
(+.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (+.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 th th))) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))))))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ 1 (sqrt 2))
(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (/.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (+.f64 (*.f64 (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
(+ (sqrt 2) (* 1/2 (* (pow th 2) (sqrt 2))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal 1/2 binary64))))
(+ (sqrt 2) (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2)))))
(-.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 th th) #s(literal -5/24 binary64)) #s(literal -1/2 binary64))) (*.f64 th th)))
(+ (sqrt 2) (* (pow th 2) (- (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/720 (sqrt 2)) (+ (* 1/48 (sqrt 2)) (* 1/2 (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2)))))))) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2)))))
(+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 th th) (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 61/720 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 th th) #s(literal 5/24 binary64)) #s(literal 1/2 binary64))))))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))

eval381.0ms (3.5%)

Memory
60.8MiB live, 983.8MiB allocated
Compiler

Compiled 89 727 to 3 020 computations (96.6% saved)

prune224.0ms (2%)

Memory
-9.9MiB live, 551.4MiB allocated
Pruning

16 alts after pruning (14 fresh and 2 done)

PrunedKeptTotal
New3 179133 192
Fresh112
Picked325
Done000
Total3 183163 199
Accuracy
100.0%
Counts
3 199 → 16
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶60.4%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
59.9%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal 1/2 binary64)))))
67.8%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
60.0%
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
✓99.0%
(/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
✓99.6%
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
▶67.4%
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
▶99.6%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
98.9%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
99.0%
(*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2)
▶60.0%
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
▶99.0%
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
98.9%
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
67.7%
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
99.0%
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2) (*.f64 (cos.f64 th) a2))
99.0%
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
Compiler

Compiled 436 to 322 computations (26.1% saved)

simplify208.0ms (1.9%)

Memory
-16.7MiB live, 138.9MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(sqrt.f64 #s(literal 2 binary64))
✓cost-diff0
(*.f64 a2 a2)
✓cost-diff0
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
✓cost-diff0
(*.f64 a2 a2)
✓cost-diff0
(*.f64 a1 a1)
✓cost-diff0
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
✓cost-diff0
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
✓cost-diff0
(sqrt.f64 #s(literal 2 binary64))
✓cost-diff0
(*.f64 a2 a2)
✓cost-diff0
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
✓cost-diff0
(sqrt.f64 #s(literal 2 binary64))
✓cost-diff0
(*.f64 a2 a2)
✓cost-diff0
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(cos.f64 th)
✓cost-diff0
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
✓cost-diff0
(pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))
✓cost-diff0
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
Rules
3 052×accelerator-lowering-fma.f32
3 052×accelerator-lowering-fma.f64
2 172×distribute-rgt-in
2 118×distribute-lft-in
1 882×*-lowering-*.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
022194
154194
2160194
3417194
4893194
51133194
61519194
72129194
83161194
94493194
105664194
116062194
126130194
136184194
146193194
156193194
166617194
177045194
187281194
197471194
207528194
217528194
227672194
237969194
07969184
Stop Event
1×iter limit
1×saturated
Calls
Call 1
Inputs
(* (pow 2 -1/2) (* (cos th) (+ (* a1 a1) (* a2 a2))))
(pow 2 -1/2)
2
-1/2
(* (cos th) (+ (* a1 a1) (* a2 a2)))
(cos th)
th
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
a1
(* a2 a2)
a2
(/ (* a2 a2) (sqrt 2))
(* a2 a2)
a2
(sqrt 2)
2
(* (/ (* a2 a2) (sqrt 2)) (+ 1 (* -1/2 (* th th))))
(/ (* a2 a2) (sqrt 2))
(* a2 a2)
a2
(sqrt 2)
2
(+ 1 (* -1/2 (* th th)))
1
(* -1/2 (* th th))
-1/2
(* th th)
th
(/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (+ 1 (* -1/2 (* th th)))))
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
a1
(* a2 a2)
a2
(/ (sqrt 2) (+ 1 (* -1/2 (* th th))))
(sqrt 2)
2
(+ 1 (* -1/2 (* th th)))
1
(* -1/2 (* th th))
-1/2
(* th th)
th
(* (/ (* a2 a2) (sqrt 2)) (cos th))
(/ (* a2 a2) (sqrt 2))
(* a2 a2)
a2
(sqrt 2)
2
(cos th)
th
Outputs
(* (pow 2 -1/2) (* (cos th) (+ (* a1 a1) (* a2 a2))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(pow 2 -1/2)
(pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))
2
#s(literal 2 binary64)
-1/2
#s(literal -1/2 binary64)
(* (cos th) (+ (* a1 a1) (* a2 a2)))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(cos th)
(cos.f64 th)
th
(+ (* a1 a1) (* a2 a2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* a1 a1)
(*.f64 a1 a1)
a1
(* a2 a2)
(*.f64 a2 a2)
a2
(/ (* a2 a2) (sqrt 2))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* a2 a2)
(*.f64 a2 a2)
a2
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(* (/ (* a2 a2) (sqrt 2)) (+ 1 (* -1/2 (* th th))))
(/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(/ (* a2 a2) (sqrt 2))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* a2 a2)
(*.f64 a2 a2)
a2
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(+ 1 (* -1/2 (* th th)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
1
#s(literal 1 binary64)
(* -1/2 (* th th))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
-1/2
#s(literal -1/2 binary64)
(* th th)
(*.f64 th th)
th
(/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (+ 1 (* -1/2 (* th th)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* a1 a1) (* a2 a2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* a1 a1)
(*.f64 a1 a1)
a1
(* a2 a2)
(*.f64 a2 a2)
a2
(/ (sqrt 2) (+ 1 (* -1/2 (* th th))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(+ 1 (* -1/2 (* th th)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
1
#s(literal 1 binary64)
(* -1/2 (* th th))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
-1/2
#s(literal -1/2 binary64)
(* th th)
(*.f64 th th)
th
(* (/ (* a2 a2) (sqrt 2)) (cos th))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* a2 a2) (sqrt 2))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* a2 a2)
(*.f64 a2 a2)
a2
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(cos th)
(cos.f64 th)
th

localize351.0ms (3.2%)

Memory
-176.0MiB live, 135.8MiB allocated
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy100.0%
(cos.f64 th)
✓accuracy99.9%
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
✓accuracy99.7%
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
✓accuracy100.0%
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy99.1%
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
✓accuracy94.0%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
✓accuracy100.0%
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy99.7%
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
✓accuracy94.1%
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
✓accuracy100.0%
(*.f64 a2 a2)
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy99.7%
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
✓accuracy100.0%
(*.f64 a1 a1)
✓accuracy100.0%
(cos.f64 th)
✓accuracy99.9%
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
✓accuracy99.7%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
Samples
303.0ms256×0valid
Compiler

Compiled 196 to 24 computations (87.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 280.0ms
ival-mult: 257.0ms (91.7% of total)
ival-cos: 10.0ms (3.6% of total)
ival-div: 4.0ms (1.4% of total)
ival-pow: 4.0ms (1.4% of total)
ival-add: 2.0ms (0.7% of total)
ival-sqrt: 2.0ms (0.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series24.0ms (0.2%)

Memory
-12.3MiB live, 23.6MiB allocated
Counts
14 → 252
Calls
Call 1
Inputs
#<alt (* (pow 2 -1/2) (* (cos th) (+ (* a1 a1) (* a2 a2))))>
#<alt (pow 2 -1/2)>
#<alt (* (cos th) (+ (* a1 a1) (* a2 a2)))>
#<alt (cos th)>
#<alt (/ (* a2 a2) (sqrt 2))>
#<alt (* a2 a2)>
#<alt (sqrt 2)>
#<alt (* (/ (* a2 a2) (sqrt 2)) (+ 1 (* -1/2 (* th th))))>
#<alt (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (+ 1 (* -1/2 (* th th)))))>
#<alt (+ (* a1 a1) (* a2 a2))>
#<alt (* a1 a1)>
#<alt (* (/ (* a2 a2) (sqrt 2)) (cos th))>
#<alt (* -1/2 (* th th))>
#<alt (/ (sqrt 2) (+ 1 (* -1/2 (* th th))))>
Outputs
#<alt (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))>
#<alt (+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))>
#<alt (+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))>
#<alt (+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))))>
#<alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))>
#<alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))>
#<alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))>
#<alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))>
#<alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))>
#<alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))>
#<alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))>
#<alt (* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))>
#<alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))>
#<alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))>
#<alt (* (pow a1 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))>
#<alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))>
#<alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))>
#<alt (* (pow a1 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))>
#<alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))>
#<alt (* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))>
#<alt (* (pow a1 2) (* (cos th) (sqrt 1/2)))>
#<alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))>
#<alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))>
#<alt (+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))>
#<alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))>
#<alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))>
#<alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))>
#<alt (* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))>
#<alt (+ (pow a1 2) (pow a2 2))>
#<alt (+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))>
#<alt (* (cos th) (+ (pow a1 2) (pow a2 2)))>
#<alt (* (cos th) (+ (pow a1 2) (pow a2 2)))>
#<alt (* (cos th) (+ (pow a1 2) (pow a2 2)))>
#<alt (* (cos th) (+ (pow a1 2) (pow a2 2)))>
#<alt (* (cos th) (+ (pow a1 2) (pow a2 2)))>
#<alt (* (cos th) (+ (pow a1 2) (pow a2 2)))>
#<alt (* (cos th) (+ (pow a1 2) (pow a2 2)))>
#<alt (* (cos th) (+ (pow a1 2) (pow a2 2)))>
#<alt (* (pow a2 2) (cos th))>
#<alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))>
#<alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))>
#<alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))>
#<alt (* (pow a1 2) (cos th))>
#<alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))>
#<alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))>
#<alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))>
#<alt (* (pow a1 2) (cos th))>
#<alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))>
#<alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))>
#<alt (* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))>
#<alt (* (pow a1 2) (cos th))>
#<alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))>
#<alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))>
#<alt (+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))>
#<alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))>
#<alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))>
#<alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))>
#<alt (* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))>
#<alt 1>
#<alt (+ 1 (* -1/2 (pow th 2)))>
#<alt (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))>
#<alt (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))>
#<alt (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))>
#<alt (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))>
#<alt (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))>
#<alt (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))>
#<alt (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))>
#<alt (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))>
#<alt (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))>
#<alt (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))>
#<alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))>
#<alt (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))>
#<alt (+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))>
#<alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))>
#<alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))>
#<alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))>
#<alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))>
#<alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))>
#<alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))>
#<alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))>
#<alt (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))>
#<alt (+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))>
#<alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))>
#<alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))>
#<alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))>
#<alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))>
#<alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))>
#<alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))>
#<alt (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))>
#<alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))>
#<alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))>
#<alt (+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))>
#<alt (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))>
#<alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))>
#<alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))>
#<alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))>
#<alt (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))>
#<alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))>
#<alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))>
#<alt (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))>
#<alt (pow a2 2)>
#<alt (+ (pow a1 2) (pow a2 2))>
#<alt (+ (pow a1 2) (pow a2 2))>
#<alt (+ (pow a1 2) (pow a2 2))>
#<alt (pow a1 2)>
#<alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt (pow a1 2)>
#<alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt (pow a1 2)>
#<alt (+ (pow a1 2) (pow a2 2))>
#<alt (+ (pow a1 2) (pow a2 2))>
#<alt (+ (pow a1 2) (pow a2 2))>
#<alt (pow a2 2)>
#<alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))>
#<alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))>
#<alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))>
#<alt (pow a2 2)>
#<alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))>
#<alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))>
#<alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2))))))) (/ (pow a2 2) (sqrt 2)))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (/ (* (pow a2 2) (cos th)) (sqrt 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (sqrt 2)>
#<alt (+ (sqrt 2) (* 1/2 (* (pow th 2) (sqrt 2))))>
#<alt (+ (sqrt 2) (* (pow th 2) (- (* 1/4 (* (pow th 2) (sqrt 2))) (* -1/2 (sqrt 2)))))>
#<alt (+ (sqrt 2) (* (pow th 2) (- (* (pow th 2) (- (* 1/8 (* (pow th 2) (sqrt 2))) (* -1/4 (sqrt 2)))) (* -1/2 (sqrt 2)))))>
#<alt (* -2 (/ (sqrt 2) (pow th 2)))>
#<alt (/ (+ (* -4 (/ (sqrt 2) (pow th 2))) (* -2 (sqrt 2))) (pow th 2))>
#<alt (/ (- (+ (* -8 (/ (sqrt 2) (pow th 4))) (* -2 (sqrt 2))) (* 4 (/ (sqrt 2) (pow th 2)))) (pow th 2))>
#<alt (/ (- (+ (* -16 (/ (sqrt 2) (pow th 6))) (* -2 (sqrt 2))) (+ (* 4 (/ (sqrt 2) (pow th 2))) (* 8 (/ (sqrt 2) (pow th 4))))) (pow th 2))>
#<alt (* -2 (/ (sqrt 2) (pow th 2)))>
#<alt (/ (+ (* -4 (/ (sqrt 2) (pow th 2))) (* -2 (sqrt 2))) (pow th 2))>
#<alt (/ (- (+ (* -8 (/ (sqrt 2) (pow th 4))) (* -2 (sqrt 2))) (* 4 (/ (sqrt 2) (pow th 2)))) (pow th 2))>
#<alt (/ (- (+ (* -16 (/ (sqrt 2) (pow th 6))) (* -2 (sqrt 2))) (+ (* 4 (/ (sqrt 2) (pow th 2))) (* 8 (/ (sqrt 2) (pow th 4))))) (pow th 2))>
Calls

63 calls:

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

rewrite413.0ms (3.8%)

Memory
18.2MiB live, 644.9MiB allocated
Algorithm
1×batch-egg-rewrite
Rules
6 838×accelerator-lowering-fma.f32
6 838×accelerator-lowering-fma.f64
6 204×*-lowering-*.f32
6 204×*-lowering-*.f64
4 272×/-lowering-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
022106
1111105
2875105
0844898
Stop Event
1×iter limit
1×node limit
Counts
14 → 1 165
Calls
Call 1
Inputs
(* (pow 2 -1/2) (* (cos th) (+ (* a1 a1) (* a2 a2))))
(pow 2 -1/2)
(* (cos th) (+ (* a1 a1) (* a2 a2)))
(cos th)
(/ (* a2 a2) (sqrt 2))
(* a2 a2)
(sqrt 2)
(* (/ (* a2 a2) (sqrt 2)) (+ 1 (* -1/2 (* th th))))
(/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (+ 1 (* -1/2 (* th th)))))
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
(* (/ (* a2 a2) (sqrt 2)) (cos th))
(* -1/2 (* th th))
(/ (sqrt 2) (+ 1 (* -1/2 (* th th))))
Outputs
(+.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(+.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(+.f64 (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (cos.f64 th) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 a1)) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (cos.f64 th) (*.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 a1 (*.f64 (*.f64 a1 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 a1 (*.f64 a1 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 a2 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 a2 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 a2 (*.f64 (*.f64 a2 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 a2 (*.f64 (*.f64 a2 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (cos.f64 th) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (cos.f64 th) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 #s(literal 1 binary64) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 1 binary64) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 1 binary64) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (cos.f64 th)) (*.f64 a1 a1)) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (cos.f64 th)) (*.f64 a2 a2)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (cos.f64 th)) (*.f64 a2 a2)) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (cos.f64 th)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (cos.f64 th)) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 th) a1) (*.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2 (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.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 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (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 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 a1)) (cos.f64 th) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (*.f64 (*.f64 a1 (*.f64 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 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (cos.f64 th) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a1) a1 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (*.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2 (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (cos.f64 th)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (cos.f64 th)) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a1) (*.f64 a1 (cos.f64 th)) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) a1)) a1 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a2) a2 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a2) a2 (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (cos.f64 th)) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) a2)) a2 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) a2)) a2 (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (/.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(fma.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))))
(/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (*.f64 (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 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(/.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) (-.f64 (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (-.f64 (*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) (*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))) (*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))) (-.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) (*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) (-.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))) (-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)))) (+.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (cos.f64 th))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (+.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (+.f64 a1 a2)) (-.f64 a1 a2))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (cos.f64 th) (+.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 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/8 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/8 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a1 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (-.f64 a1 a2)))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (cos.f64 th)))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/8 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -1/8 binary64)))
(*.f64 (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(exp.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 4 binary64)) #s(literal -1/4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (+.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64))
(pow.f64 (exp.f64 #s(literal -1/2 binary64)) (log.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) #s(literal 1 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/8 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/8 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (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 #s(literal 2 binary64) #s(literal -1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/8 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -1/8 binary64)))
(+.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(+.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))
(-.f64 (/.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (cos.f64 th) (*.f64 a1 a1) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(fma.f64 (cos.f64 th) (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (cos.f64 th))))
(fma.f64 a1 (*.f64 a1 (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(fma.f64 (*.f64 a1 a1) (cos.f64 th) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(fma.f64 a2 (*.f64 a2 (cos.f64 th)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))
(fma.f64 (*.f64 a2 a2) (cos.f64 th) (*.f64 a1 (*.f64 a1 (cos.f64 th))))
(fma.f64 (*.f64 (cos.f64 th) a1) a1 (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(fma.f64 (*.f64 (cos.f64 th) a2) a2 (*.f64 a1 (*.f64 a1 (cos.f64 th))))
(/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))) (+.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (cos.f64 th))))
(/.f64 (+.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (cos.f64 th)) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (cos.f64 th))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (cos.f64 th)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (cos.f64 th)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (+.f64 a1 a2)) (-.f64 a1 a2))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (cos.f64 th)) (+.f64 a1 a2)) (-.f64 a1 a2))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (cos.f64 th)))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 th)))
(*.f64 (+.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))))))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (+.f64 a1 a2)) (/.f64 (cos.f64 th) (-.f64 a1 a2)))
(*.f64 (/.f64 (cos.f64 th) (+.f64 a1 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (-.f64 a1 a2)))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (cos.f64 th)) (+.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (cos.f64 th)) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 (/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (cos.f64 th)) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(cos.f64 th)
(*.f64 (cos.f64 th) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 th))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal -1 binary64)))
(exp.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (log.f64 a2))))
(exp.f64 (+.f64 (*.f64 #s(literal 2 binary64) (log.f64 a2)) (*.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 2 binary64)))))
(exp.f64 (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 a2)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (*.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)))
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(/.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 a2 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal -1 binary64))
(pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) a2) #s(literal 2 binary64))
(pow.f64 (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) #s(literal 2 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 a2 a2)))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 #s(literal 1 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) a2) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) a2))
(*.f64 (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))))
(*.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 a2 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) a2) #s(literal -1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a2)))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(pow.f64 a2 #s(literal 2 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 a2)) #s(literal 2 binary64))
(*.f64 a2 a2)
(*.f64 a2 (neg.f64 (-.f64 #s(literal 0 binary64) a2)))
(*.f64 a2 (*.f64 a2 #s(literal 1 binary64)))
(*.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 a2 a2))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(*.f64 (-.f64 #s(literal 0 binary64) a2) (-.f64 #s(literal 0 binary64) a2))
(*.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)))
(*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) a2)) a2)
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(sqrt.f64 #s(literal 2 binary64))
(neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(+.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(+.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(-.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (/.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(-.f64 (/.f64 (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) (/.f64 (pow.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64)) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (*.f64 th th))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 (*.f64 a2 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 th (*.f64 th (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 th (*.f64 (*.f64 #s(literal -1/2 binary64) th) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 th (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 th (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 a2 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (*.f64 a2 a2) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 1 binary64) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 #s(literal 1 binary64) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (*.f64 th th) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 a2 a2)) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 1 binary64) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) th) (/.f64 (*.f64 th (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 #s(literal 1 binary64)) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (*.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (*.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (*.f64 th th))) #s(literal -1/2 binary64) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) th (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (*.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) a2) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) a2) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (/.f64 a2 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) a2) #s(literal -1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th th) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (/.f64 th (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) th) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 th (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) 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 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) #s(literal -1 binary64)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (*.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (*.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 a2 a2) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) th) (*.f64 #s(literal -1/2 binary64) th) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2))) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) #s(literal 1 binary64)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(neg.f64 (*.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))) (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (-.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))) (+.f64 (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(/.f64 (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))) (*.f64 a2 a2)))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (+.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (*.f64 a2 a2)))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
(/.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (*.f64 a2 a2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (*.f64 a2 a2)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))) (*.f64 a2 a2))))
(/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))))
(/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))))
(/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (*.f64 a2 a2))))
(/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))))
(/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(/.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (-.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))))
(/.f64 (+.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) #s(literal -1 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (+.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) #s(literal -1 binary64))))
(/.f64 (*.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))) (*.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 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (*.f64 a2 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal -1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (neg.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (*.f64 a2 a2)))) (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (-.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))) (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 3 binary64)) (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 2 binary64)) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 2 binary64)) (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 2 binary64))) (-.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
(/.f64 (*.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) #s(literal -1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(/.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (+.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) #s(literal -1 binary64))) (+.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) #s(literal -1 binary64)))
(/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(/.f64 (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (*.f64 (+.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) #s(literal -1 binary64)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (+.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) #s(literal -1 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(/.f64 (/.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) 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 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))) #s(literal -1 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))))
(*.f64 a2 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(*.f64 a2 (*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))) (*.f64 a2 a2))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (*.f64 a2 a2))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
(*.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))))
(*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(*.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))))
(*.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (-.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))))))
(*.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) #s(literal 1 binary64))
(*.f64 (*.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(*.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (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 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) #s(literal -1 binary64)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2)
(*.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) 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 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (-.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) #s(literal 1 binary64)))))
(*.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))
(*.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(*.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))
(+.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(+.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(+.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(+.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (/.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 th (*.f64 (*.f64 #s(literal -1/2 binary64) th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(fma.f64 a2 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 a2 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))) (*.f64 a2 a2))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))) (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(fma.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (*.f64 a2 a2))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) th) (*.f64 th (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (+.f64 (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (-.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (+.f64 (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (-.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(fma.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))
(fma.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 th (*.f64 th #s(literal 1/2 binary64))) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) 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 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) 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 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) #s(literal -1 binary64)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) #s(literal -1 binary64)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (*.f64 th th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) th) (*.f64 #s(literal -1/2 binary64) th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 th th)) #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) th)) th (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(fma.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) 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 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) 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 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (-.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) #s(literal 1 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (-.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) #s(literal 1 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))))
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (neg.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (neg.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (neg.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (*.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(/.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (-.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(/.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) #s(literal -1 binary64))) (+.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) #s(literal -1 binary64)))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(/.f64 (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(/.f64 (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (*.f64 (+.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) #s(literal -1 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) #s(literal -1 binary64)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))
(/.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(/.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (+.f64 a1 a2)) (-.f64 a1 a2))
(/.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) #s(literal -1 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) #s(literal 1 binary64))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(*.f64 (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(*.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (+.f64 a1 a2)) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a1 a2)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(*.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (-.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) #s(literal 1 binary64)))))
(*.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))
(*.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(*.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+.f64 (*.f64 a2 a2) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(+.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(+.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 a2 a2))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(-.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(fma.f64 a2 a2 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(fma.f64 a2 (neg.f64 (-.f64 #s(literal 0 binary64) a2)) (*.f64 a1 a1))
(fma.f64 a2 (neg.f64 (-.f64 #s(literal 0 binary64) a2)) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(fma.f64 a2 (*.f64 a2 #s(literal 1 binary64)) (*.f64 a1 a1))
(fma.f64 a2 (*.f64 a2 #s(literal 1 binary64)) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(fma.f64 (*.f64 a2 a2) #s(literal 1 binary64) (*.f64 a1 a1))
(fma.f64 (*.f64 a2 a2) #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(fma.f64 #s(literal 1 binary64) (*.f64 a2 a2) (*.f64 a1 a1))
(fma.f64 #s(literal 1 binary64) (*.f64 a2 a2) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (-.f64 #s(literal 0 binary64) a2) (*.f64 a1 a1))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (-.f64 #s(literal 0 binary64) a2) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 a1 a1))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(fma.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)) (*.f64 a2 a2))
(fma.f64 (neg.f64 (-.f64 #s(literal 0 binary64) a2)) a2 (*.f64 a1 a1))
(fma.f64 (neg.f64 (-.f64 #s(literal 0 binary64) a2)) a2 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(fma.f64 (/.f64 a1 (+.f64 a1 a2)) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (-.f64 a1 a2)) (neg.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (+.f64 a1 a2)) (/.f64 (*.f64 a1 a1) (-.f64 a1 a2)) (neg.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (+.f64 a1 a2)) (/.f64 a1 (-.f64 a1 a2)) (neg.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (neg.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (neg.f64 (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (*.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))))) (*.f64 (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (*.f64 (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (neg.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (neg.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (+.f64 a1 a2)) (-.f64 a1 a2))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (+.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) #s(literal 1 binary64)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal 1 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) #s(literal 1 binary64)))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))
(*.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 a1 a2)) (+.f64 a1 a2))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a1)))
(pow.f64 a1 #s(literal 2 binary64))
(pow.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 a1)) #s(literal 2 binary64))
(*.f64 a1 a1)
(*.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)))
(neg.f64 (*.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(neg.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal 1 binary64)))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (neg.f64 (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 #s(literal -1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))))
(*.f64 (cos.f64 th) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(*.f64 a2 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(*.f64 a2 (*.f64 (*.f64 a2 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (cos.f64 th))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (cos.f64 th)) (*.f64 a2 a2)))
(*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (cos.f64 th)))
(*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
(*.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.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))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)))
(*.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2)
(*.f64 (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (cos.f64 th)))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a2) a2)
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) a2)) a2)
(*.f64 (/.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1 binary64)))
(*.f64 th (*.f64 #s(literal -1/2 binary64) th))
(*.f64 th (*.f64 (*.f64 #s(literal -1/2 binary64) th) #s(literal 1 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))
(*.f64 (*.f64 th th) #s(literal -1/2 binary64))
(*.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) #s(literal 1 binary64))
(*.f64 (*.f64 #s(literal -1/2 binary64) th) th)
(*.f64 (*.f64 #s(literal -1/2 binary64) th) (*.f64 th #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) th) (*.f64 #s(literal -1/2 binary64) th))
(+.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) #s(literal 1 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))
(+.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) #s(literal 1 binary64)))
(+.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) #s(literal 1 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))
(+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))))
(+.f64 (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))) (*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))))
(+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))) (*.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))))
(exp.f64 (*.f64 (log.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (*.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))))
(fma.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) #s(literal 1 binary64)))
(fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))
(neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) #s(literal 1 binary64)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) #s(literal 1 binary64))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(/.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (-.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) #s(literal 1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (+.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal -1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))))
(*.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64)))))
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) 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 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th)))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal -1/2 binary64))))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) #s(literal -1 binary64))) (+.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) #s(literal -1 binary64)))

simplify424.0ms (3.9%)

Memory
5.7MiB live, 557.7MiB allocated
Algorithm
1×egg-herbie
Rules
13 018×accelerator-lowering-fma.f32
13 018×accelerator-lowering-fma.f64
4 996×*-lowering-*.f32
4 996×*-lowering-*.f64
3 648×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01863249
15813182
221043149
355732977
470702977
080642758
Stop Event
1×iter limit
1×node limit
Counts
252 → 252
Calls
Call 1
Inputs
(* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))
(+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(+ (pow a1 2) (pow a2 2))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (pow a2 2) (cos th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(* (pow a1 2) (cos th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (cos th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (cos th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(* (pow a2 2) (cos th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (cos th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
1
(+ 1 (* -1/2 (pow th 2)))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(pow a2 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2))))))) (/ (pow a2 2) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(sqrt 2)
(+ (sqrt 2) (* 1/2 (* (pow th 2) (sqrt 2))))
(+ (sqrt 2) (* (pow th 2) (- (* 1/4 (* (pow th 2) (sqrt 2))) (* -1/2 (sqrt 2)))))
(+ (sqrt 2) (* (pow th 2) (- (* (pow th 2) (- (* 1/8 (* (pow th 2) (sqrt 2))) (* -1/4 (sqrt 2)))) (* -1/2 (sqrt 2)))))
(* -2 (/ (sqrt 2) (pow th 2)))
(/ (+ (* -4 (/ (sqrt 2) (pow th 2))) (* -2 (sqrt 2))) (pow th 2))
(/ (- (+ (* -8 (/ (sqrt 2) (pow th 4))) (* -2 (sqrt 2))) (* 4 (/ (sqrt 2) (pow th 2)))) (pow th 2))
(/ (- (+ (* -16 (/ (sqrt 2) (pow th 6))) (* -2 (sqrt 2))) (+ (* 4 (/ (sqrt 2) (pow th 2))) (* 8 (/ (sqrt 2) (pow th 4))))) (pow th 2))
(* -2 (/ (sqrt 2) (pow th 2)))
(/ (+ (* -4 (/ (sqrt 2) (pow th 2))) (* -2 (sqrt 2))) (pow th 2))
(/ (- (+ (* -8 (/ (sqrt 2) (pow th 4))) (* -2 (sqrt 2))) (* 4 (/ (sqrt 2) (pow th 2)))) (pow th 2))
(/ (- (+ (* -16 (/ (sqrt 2) (pow th 6))) (* -2 (sqrt 2))) (+ (* 4 (/ (sqrt 2) (pow th 2))) (* 8 (/ (sqrt 2) (pow th 4))))) (pow th 2))
Outputs
(* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 th th) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))))))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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)))
(+.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th (*.f64 th (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))))))))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a1 2) (cos th))
(*.f64 a1 (*.f64 a1 (cos.f64 th)))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a1 2) (cos th))
(*.f64 a1 (*.f64 a1 (cos.f64 th)))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a1 2) (cos th))
(*.f64 a1 (*.f64 a1 (cos.f64 th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow th 2)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))))))
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(/.f64 (*.f64 (*.f64 a2 a2) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(/.f64 (*.f64 (*.f64 a2 a2) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) th) th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) th) th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) th) th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) th) th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) th) th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2))))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) th) th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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)))
(+.f64 (/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (*.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
(+ (sqrt 2) (* 1/2 (* (pow th 2) (sqrt 2))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (sqrt 2) (* (pow th 2) (- (* 1/4 (* (pow th 2) (sqrt 2))) (* -1/2 (sqrt 2)))))
(+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 th th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))))))
(+ (sqrt 2) (* (pow th 2) (- (* (pow th 2) (- (* 1/8 (* (pow th 2) (sqrt 2))) (* -1/4 (sqrt 2)))) (* -1/2 (sqrt 2)))))
(+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) #s(literal 1/8 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))
(* -2 (/ (sqrt 2) (pow th 2)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) (*.f64 th th))
(/ (+ (* -4 (/ (sqrt 2) (pow th 2))) (* -2 (sqrt 2))) (pow th 2))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 th th)) (+.f64 #s(literal -2 binary64) (/.f64 #s(literal -4 binary64) (*.f64 th th))))
(/ (- (+ (* -8 (/ (sqrt 2) (pow th 4))) (* -2 (sqrt 2))) (* 4 (/ (sqrt 2) (pow th 2)))) (pow th 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -2 binary64) (/.f64 #s(literal -8 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -4 binary64)) (*.f64 th th))) (*.f64 th th))
(/ (- (+ (* -16 (/ (sqrt 2) (pow th 6))) (* -2 (sqrt 2))) (+ (* 4 (/ (sqrt 2) (pow th 2))) (* 8 (/ (sqrt 2) (pow th 4))))) (pow th 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -2 binary64) (/.f64 #s(literal -16 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal -4 binary64) (*.f64 th th)) (/.f64 #s(literal -8 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (*.f64 th th))
(* -2 (/ (sqrt 2) (pow th 2)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) (*.f64 th th))
(/ (+ (* -4 (/ (sqrt 2) (pow th 2))) (* -2 (sqrt 2))) (pow th 2))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 th th)) (+.f64 #s(literal -2 binary64) (/.f64 #s(literal -4 binary64) (*.f64 th th))))
(/ (- (+ (* -8 (/ (sqrt 2) (pow th 4))) (* -2 (sqrt 2))) (* 4 (/ (sqrt 2) (pow th 2)))) (pow th 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -2 binary64) (/.f64 #s(literal -8 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -4 binary64)) (*.f64 th th))) (*.f64 th th))
(/ (- (+ (* -16 (/ (sqrt 2) (pow th 6))) (* -2 (sqrt 2))) (+ (* 4 (/ (sqrt 2) (pow th 2))) (* 8 (/ (sqrt 2) (pow th 4))))) (pow th 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -2 binary64) (/.f64 #s(literal -16 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal -4 binary64) (*.f64 th th)) (/.f64 #s(literal -8 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (*.f64 th th))

eval217.0ms (2%)

Memory
43.6MiB live, 340.7MiB allocated
Compiler

Compiled 50 759 to 3 079 computations (93.9% saved)

prune230.0ms (2.1%)

Memory
15.9MiB live, 406.8MiB allocated
Pruning

26 alts after pruning (22 fresh and 4 done)

PrunedKeptTotal
New1 847211 868
Fresh819
Picked325
Done022
Total1 858261 884
Accuracy
100.0%
Counts
1 884 → 26
Alt Table
Click to see full alt table
StatusAccuracyProgram
67.3%
(pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) a2) #s(literal 2 binary64))
67.4%
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)))
52.0%
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
▶15.5%
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
59.9%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))
67.8%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
15.3%
(/.f64 (*.f64 (*.f64 a2 a2) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))
✓99.0%
(/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
✓99.6%
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
98.9%
(/.f64 (*.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
59.4%
(/.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (sqrt.f64 #s(literal 2 binary64)))
✓67.4%
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
▶13.4%
(/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
67.4%
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
67.4%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
▶99.0%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))
67.4%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2))
59.4%
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
54.1%
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
✓99.0%
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
98.9%
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
▶67.4%
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
59.9%
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
67.4%
(*.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
▶67.8%
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
99.0%
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2)))
Compiler

Compiled 785 to 560 computations (28.7% saved)

simplify440.0ms (4%)

Memory
-4.2MiB live, 584.1MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))
✓cost-diff0
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))
✓cost-diff128
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))
✓cost-diff1024
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
✓cost-diff0
(sqrt.f64 #s(literal 2 binary64))
✓cost-diff0
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
✓cost-diff0
(*.f64 a1 a1)
✓cost-diff0
(/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
✓cost-diff0
(*.f64 a1 a1)
✓cost-diff0
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
✓cost-diff0
(sqrt.f64 #s(literal 1/2 binary64))
✓cost-diff0
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
✓cost-diff0
(sqrt.f64 #s(literal 2 binary64))
✓cost-diff0
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
✓cost-diff0
(*.f64 a2 (cos.f64 th))
✓cost-diff0
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
✓cost-diff0
(pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))
✓cost-diff0
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))
Rules
13 496×accelerator-lowering-fma.f32
13 496×accelerator-lowering-fma.f64
4 354×*-lowering-*.f32
4 354×*-lowering-*.f64
3 764×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
037278
195258
2206244
3613236
43884236
57783236
08209225
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(* (pow 2 -1/2) (* a2 (* a2 (cos th))))
(pow 2 -1/2)
2
-1/2
(* a2 (* a2 (cos th)))
a2
(* a2 (cos th))
(cos th)
th
(* (/ a2 (sqrt 2)) a2)
(/ a2 (sqrt 2))
a2
(sqrt 2)
2
(* (sqrt 1/2) (+ (* a1 a1) (* a2 a2)))
(sqrt 1/2)
1/2
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
a1
(* a2 a2)
a2
(/ (* a1 a1) (/ (sqrt 2) (+ 1 (* -1/2 (* th th)))))
(* a1 a1)
a1
(/ (sqrt 2) (+ 1 (* -1/2 (* th th))))
(sqrt 2)
2
(+ 1 (* -1/2 (* th th)))
1
(* -1/2 (* th th))
-1/2
(* th th)
th
(/ (/ 1 (/ (/ (sqrt 2) (+ 1 (* th (* -1/2 th)))) (- (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (* a2 a2))))) (- (* a1 a1) (* a2 a2)))
(/ 1 (/ (/ (sqrt 2) (+ 1 (* th (* -1/2 th)))) (- (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (* a2 a2)))))
1
(/ (/ (sqrt 2) (+ 1 (* th (* -1/2 th)))) (- (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (* a2 a2))))
(/ (sqrt 2) (+ 1 (* th (* -1/2 th))))
(sqrt 2)
2
(+ 1 (* th (* -1/2 th)))
(* th (* -1/2 th))
th
(* -1/2 th)
-1/2
(- (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (* a2 a2)))
(* a1 (* a1 (* a1 a1)))
a1
(* a1 (* a1 a1))
(* a1 a1)
(* (* a2 a2) (* a2 a2))
(* a2 a2)
a2
(- (* a1 a1) (* a2 a2))
Outputs
(* (pow 2 -1/2) (* a2 (* a2 (cos th))))
(*.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)))
(pow 2 -1/2)
(pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))
2
#s(literal 2 binary64)
-1/2
#s(literal -1/2 binary64)
(* a2 (* a2 (cos th)))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
a2
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(cos th)
(cos.f64 th)
th
(* (/ a2 (sqrt 2)) a2)
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
a2
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(* (sqrt 1/2) (+ (* a1 a1) (* a2 a2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(+ (* a1 a1) (* a2 a2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* a1 a1)
(*.f64 a1 a1)
a1
(* a2 a2)
(*.f64 a2 a2)
a2
(/ (* a1 a1) (/ (sqrt 2) (+ 1 (* -1/2 (* th th)))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(* a1 a1)
(*.f64 a1 a1)
a1
(/ (sqrt 2) (+ 1 (* -1/2 (* th th))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(+ 1 (* -1/2 (* th th)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
1
#s(literal 1 binary64)
(* -1/2 (* th th))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
-1/2
#s(literal -1/2 binary64)
(* th th)
(*.f64 th th)
th
(/ (/ 1 (/ (/ (sqrt 2) (+ 1 (* th (* -1/2 th)))) (- (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (* a2 a2))))) (- (* a1 a1) (* a2 a2)))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/ 1 (/ (/ (sqrt 2) (+ 1 (* th (* -1/2 th)))) (- (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (* a2 a2)))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
1
#s(literal 1 binary64)
(/ (/ (sqrt 2) (+ 1 (* th (* -1/2 th)))) (- (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (* a2 a2))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/ (sqrt 2) (+ 1 (* th (* -1/2 th))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(+ 1 (* th (* -1/2 th)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(* th (* -1/2 th))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
th
(* -1/2 th)
(*.f64 #s(literal -1/2 binary64) th)
-1/2
#s(literal -1/2 binary64)
(- (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (* a2 a2)))
(-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))
(* a1 (* a1 (* a1 a1)))
(*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))
a1
(* a1 (* a1 a1))
(*.f64 a1 (*.f64 a1 a1))
(* a1 a1)
(*.f64 a1 a1)
(* (* a2 a2) (* a2 a2))
(*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))
(* a2 a2)
(*.f64 a2 a2)
a2
(- (* a1 a1) (* a2 a2))
(-.f64 (*.f64 a1 a1) (*.f64 a2 a2))

localize207.0ms (1.9%)

Memory
9.5MiB live, 214.2MiB allocated
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓accuracy96.9%
(-.f64 (*.f64 a1 a1) (*.f64 a2 a2))
✓accuracy92.9%
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))
✓accuracy88.7%
(-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))
✓accuracy42.0%
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
✓accuracy100.0%
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy99.1%
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
✓accuracy79.1%
(/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
✓accuracy100.0%
(*.f64 a2 a2)
✓accuracy100.0%
(*.f64 a1 a1)
✓accuracy100.0%
(sqrt.f64 #s(literal 1/2 binary64))
✓accuracy99.6%
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy99.8%
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
✓accuracy99.3%
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
✓accuracy100.0%
(cos.f64 th)
✓accuracy99.9%
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
✓accuracy99.8%
(*.f64 a2 (cos.f64 th))
✓accuracy99.7%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))
Samples
131.0ms256×0valid
Compiler

Compiled 292 to 39 computations (86.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 62.0ms
ival-mult: 19.0ms (30.5% of total)
ival-add: 17.0ms (27.3% of total)
ival-div: 10.0ms (16.1% of total)
ival-cos: 6.0ms (9.6% of total)
ival-pow: 4.0ms (6.4% of total)
ival-sqrt: 3.0ms (4.8% of total)
ival-sub: 2.0ms (3.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series58.0ms (0.5%)

Memory
-12.2MiB live, 71.3MiB allocated
Counts
22 → 396
Calls
Call 1
Inputs
#<alt (* (pow 2 -1/2) (* a2 (* a2 (cos th))))>
#<alt (pow 2 -1/2)>
#<alt (* a2 (* a2 (cos th)))>
#<alt (* a2 (cos th))>
#<alt (* (/ a2 (sqrt 2)) a2)>
#<alt (/ a2 (sqrt 2))>
#<alt (sqrt 2)>
#<alt (* (sqrt 1/2) (+ (* a1 a1) (* a2 a2)))>
#<alt (sqrt 1/2)>
#<alt (+ (* a1 a1) (* a2 a2))>
#<alt (* a1 a1)>
#<alt (/ (* a1 a1) (/ (sqrt 2) (+ 1 (* -1/2 (* th th)))))>
#<alt (/ (sqrt 2) (+ 1 (* -1/2 (* th th))))>
#<alt (/ (/ 1 (/ (/ (sqrt 2) (+ 1 (* th (* -1/2 th)))) (- (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (* a2 a2))))) (- (* a1 a1) (* a2 a2)))>
#<alt (/ 1 (/ (/ (sqrt 2) (+ 1 (* th (* -1/2 th)))) (- (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (* a2 a2)))))>
#<alt (/ (/ (sqrt 2) (+ 1 (* th (* -1/2 th)))) (- (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (* a2 a2))))>
#<alt (/ (sqrt 2) (+ 1 (* th (* -1/2 th))))>
#<alt (cos th)>
#<alt (* a2 a2)>
#<alt (* -1/2 (* th th))>
#<alt (- (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (* a2 a2)))>
#<alt (- (* a1 a1) (* a2 a2))>
Outputs
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (sqrt 1/2))>
#<alt (+ (* -1/2 (* (pow a2 2) (* (pow th 2) (sqrt 1/2)))) (* (pow a2 2) (sqrt 1/2)))>
#<alt (+ (* (pow a2 2) (sqrt 1/2)) (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 1/2))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 1/2)))))))>
#<alt (+ (* (pow a2 2) (sqrt 1/2)) (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 1/2))) (* (pow th 2) (+ (* -1/720 (* (pow a2 2) (* (pow th 2) (sqrt 1/2)))) (* 1/24 (* (pow a2 2) (sqrt 1/2))))))))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (* (cos th) (sqrt 1/2)))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (pow a2 2)>
#<alt (+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* 1/24 (* (pow a2 2) (pow th 2))))) (pow a2 2))>
#<alt (+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* (pow th 2) (+ (* -1/720 (* (pow a2 2) (pow th 2))) (* 1/24 (pow a2 2)))))) (pow a2 2))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* (pow a2 2) (cos th))>
#<alt (* a2 (cos th))>
#<alt (* a2 (cos th))>
#<alt (* a2 (cos th))>
#<alt (* a2 (cos th))>
#<alt (* a2 (cos th))>
#<alt (* a2 (cos th))>
#<alt (* a2 (cos th))>
#<alt (* a2 (cos th))>
#<alt (* a2 (cos th))>
#<alt (* a2 (cos th))>
#<alt (* a2 (cos th))>
#<alt (* a2 (cos th))>
#<alt a2>
#<alt (+ a2 (* -1/2 (* a2 (pow th 2))))>
#<alt (+ a2 (* (pow th 2) (+ (* -1/2 a2) (* 1/24 (* a2 (pow th 2))))))>
#<alt (+ a2 (* (pow th 2) (+ (* -1/2 a2) (* (pow th 2) (+ (* -1/720 (* a2 (pow th 2))) (* 1/24 a2))))))>
#<alt (* a2 (cos th))>
#<alt (* a2 (cos th))>
#<alt (* a2 (cos th))>
#<alt (* a2 (cos th))>
#<alt (* a2 (cos th))>
#<alt (* a2 (cos th))>
#<alt (* a2 (cos th))>
#<alt (* a2 (cos th))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (/ a2 (sqrt 2))>
#<alt (/ a2 (sqrt 2))>
#<alt (/ a2 (sqrt 2))>
#<alt (/ a2 (sqrt 2))>
#<alt (/ a2 (sqrt 2))>
#<alt (/ a2 (sqrt 2))>
#<alt (/ a2 (sqrt 2))>
#<alt (/ a2 (sqrt 2))>
#<alt (/ a2 (sqrt 2))>
#<alt (/ a2 (sqrt 2))>
#<alt (/ a2 (sqrt 2))>
#<alt (/ a2 (sqrt 2))>
#<alt (* (pow a2 2) (sqrt 1/2))>
#<alt (+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))>
#<alt (+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))>
#<alt (+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))>
#<alt (* (pow a1 2) (sqrt 1/2))>
#<alt (* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))>
#<alt (* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))>
#<alt (* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))>
#<alt (* (pow a1 2) (sqrt 1/2))>
#<alt (* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))>
#<alt (* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))>
#<alt (* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))>
#<alt (* (pow a1 2) (sqrt 1/2))>
#<alt (+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))>
#<alt (+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))>
#<alt (+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))>
#<alt (* (pow a2 2) (sqrt 1/2))>
#<alt (* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))>
#<alt (* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))>
#<alt (* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))>
#<alt (* (pow a2 2) (sqrt 1/2))>
#<alt (* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))>
#<alt (* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))>
#<alt (* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))>
#<alt (pow a2 2)>
#<alt (+ (pow a1 2) (pow a2 2))>
#<alt (+ (pow a1 2) (pow a2 2))>
#<alt (+ (pow a1 2) (pow a2 2))>
#<alt (pow a1 2)>
#<alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt (pow a1 2)>
#<alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt (* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt (pow a1 2)>
#<alt (+ (pow a1 2) (pow a2 2))>
#<alt (+ (pow a1 2) (pow a2 2))>
#<alt (+ (pow a1 2) (pow a2 2))>
#<alt (pow a2 2)>
#<alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))>
#<alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))>
#<alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))>
#<alt (pow a2 2)>
#<alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))>
#<alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))>
#<alt (* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (pow a1 2)>
#<alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))>
#<alt (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))>
#<alt (+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))>
#<alt (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2)))>
#<alt (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))>
#<alt (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))>
#<alt (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))>
#<alt (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2)))>
#<alt (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))>
#<alt (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))>
#<alt (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))>
#<alt (sqrt 2)>
#<alt (+ (sqrt 2) (* 1/2 (* (pow th 2) (sqrt 2))))>
#<alt (+ (sqrt 2) (* (pow th 2) (- (* 1/4 (* (pow th 2) (sqrt 2))) (* -1/2 (sqrt 2)))))>
#<alt (+ (sqrt 2) (* (pow th 2) (- (* (pow th 2) (- (* 1/8 (* (pow th 2) (sqrt 2))) (* -1/4 (sqrt 2)))) (* -1/2 (sqrt 2)))))>
#<alt (* -2 (/ (sqrt 2) (pow th 2)))>
#<alt (/ (+ (* -4 (/ (sqrt 2) (pow th 2))) (* -2 (sqrt 2))) (pow th 2))>
#<alt (/ (- (+ (* -8 (/ (sqrt 2) (pow th 4))) (* -2 (sqrt 2))) (* 4 (/ (sqrt 2) (pow th 2)))) (pow th 2))>
#<alt (/ (- (+ (* -16 (/ (sqrt 2) (pow th 6))) (* -2 (sqrt 2))) (+ (* 4 (/ (sqrt 2) (pow th 2))) (* 8 (/ (sqrt 2) (pow th 4))))) (pow th 2))>
#<alt (* -2 (/ (sqrt 2) (pow th 2)))>
#<alt (/ (+ (* -4 (/ (sqrt 2) (pow th 2))) (* -2 (sqrt 2))) (pow th 2))>
#<alt (/ (- (+ (* -8 (/ (sqrt 2) (pow th 4))) (* -2 (sqrt 2))) (* 4 (/ (sqrt 2) (pow th 2)))) (pow th 2))>
#<alt (/ (- (+ (* -16 (/ (sqrt 2) (pow th 6))) (* -2 (sqrt 2))) (+ (* 4 (/ (sqrt 2) (pow th 2))) (* 8 (/ (sqrt 2) (pow th 4))))) (pow th 2))>
#<alt (/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))>
#<alt (- (+ (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a2 4) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))>
#<alt (- (+ (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a2 4) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))>
#<alt (- (+ (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a2 4) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))>
#<alt (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))>
#<alt (* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))) (/ (pow a2 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))))>
#<alt (* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))) (/ (pow a2 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))))>
#<alt (* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))) (/ (pow a2 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))))>
#<alt (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))>
#<alt (* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))) (/ (pow a2 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))))>
#<alt (* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))) (/ (pow a2 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))))>
#<alt (* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))) (/ (pow a2 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))))>
#<alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))>
#<alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))>
#<alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))>
#<alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))>
#<alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))>
#<alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))>
#<alt (* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))>
#<alt (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))>
#<alt (+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))>
#<alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))>
#<alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))>
#<alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))>
#<alt (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))>
#<alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))>
#<alt (* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))>
#<alt (/ (- (pow a1 4) (pow a2 4)) (sqrt 2))>
#<alt (- (+ (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (sqrt 2))) (/ (pow a1 4) (sqrt 2))) (/ (pow a2 4) (sqrt 2)))>
#<alt (- (+ (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (sqrt 2))) (/ (pow a1 4) (sqrt 2))) (/ (pow a2 4) (sqrt 2)))>
#<alt (- (+ (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (sqrt 2))) (/ (pow a1 4) (sqrt 2))) (/ (pow a2 4) (sqrt 2)))>
#<alt (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (sqrt 2)))>
#<alt (* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (sqrt 2))) (/ (pow a1 4) (* (pow th 2) (sqrt 2)))) (/ (pow a2 4) (* (pow th 2) (sqrt 2)))))>
#<alt (* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (sqrt 2))) (/ (pow a1 4) (* (pow th 2) (sqrt 2)))) (/ (pow a2 4) (* (pow th 2) (sqrt 2)))))>
#<alt (* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (sqrt 2))) (/ (pow a1 4) (* (pow th 2) (sqrt 2)))) (/ (pow a2 4) (* (pow th 2) (sqrt 2)))))>
#<alt (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (sqrt 2)))>
#<alt (* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (sqrt 2))) (/ (pow a1 4) (* (pow th 2) (sqrt 2)))) (/ (pow a2 4) (* (pow th 2) (sqrt 2)))))>
#<alt (* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (sqrt 2))) (/ (pow a1 4) (* (pow th 2) (sqrt 2)))) (/ (pow a2 4) (* (pow th 2) (sqrt 2)))))>
#<alt (* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (sqrt 2))) (/ (pow a1 4) (* (pow th 2) (sqrt 2)))) (/ (pow a2 4) (* (pow th 2) (sqrt 2)))))>
#<alt (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))>
#<alt (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (* (pow a1 4) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))>
#<alt (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (* (pow a1 4) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))>
#<alt (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (* (pow a1 4) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))>
#<alt (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (* (pow a1 4) (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 4) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))>
#<alt (* (pow a1 4) (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 4) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))>
#<alt (* (pow a1 4) (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 4) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))>
#<alt (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (* (pow a1 4) (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 4) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))>
#<alt (* (pow a1 4) (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 4) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))>
#<alt (* (pow a1 4) (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 4) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))>
#<alt (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))>
#<alt (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))>
#<alt (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))>
#<alt (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))>
#<alt (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))>
#<alt (* (pow a2 4) (+ (* -1 (/ (+ 1 (* -1/2 (pow th 2))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 4) (sqrt 2)))))>
#<alt (* (pow a2 4) (+ (* -1 (/ (+ 1 (* -1/2 (pow th 2))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 4) (sqrt 2)))))>
#<alt (* (pow a2 4) (+ (* -1 (/ (+ 1 (* -1/2 (pow th 2))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 4) (sqrt 2)))))>
#<alt (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))>
#<alt (* (pow a2 4) (+ (* -1 (/ (+ 1 (* -1/2 (pow th 2))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 4) (sqrt 2)))))>
#<alt (* (pow a2 4) (+ (* -1 (/ (+ 1 (* -1/2 (pow th 2))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 4) (sqrt 2)))))>
#<alt (* (pow a2 4) (+ (* -1 (/ (+ 1 (* -1/2 (pow th 2))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 4) (sqrt 2)))))>
#<alt (/ (sqrt 2) (- (pow a1 4) (pow a2 4)))>
#<alt (+ (* 1/2 (/ (* (pow th 2) (sqrt 2)) (- (pow a1 4) (pow a2 4)))) (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))>
#<alt (+ (* (pow th 2) (- (* 1/4 (/ (* (pow th 2) (sqrt 2)) (- (pow a1 4) (pow a2 4)))) (* -1/2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4)))))) (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))>
#<alt (+ (* (pow th 2) (- (* (pow th 2) (- (* 1/8 (/ (* (pow th 2) (sqrt 2)) (- (pow a1 4) (pow a2 4)))) (* -1/4 (/ (sqrt 2) (- (pow a1 4) (pow a2 4)))))) (* -1/2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4)))))) (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))>
#<alt (* -2 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4)))))>
#<alt (/ (+ (* -4 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4))))) (* -2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))) (pow th 2))>
#<alt (/ (- (+ (* -8 (/ (sqrt 2) (* (pow th 4) (- (pow a1 4) (pow a2 4))))) (* -2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))) (* 4 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4)))))) (pow th 2))>
#<alt (/ (- (+ (* -16 (/ (sqrt 2) (* (pow th 6) (- (pow a1 4) (pow a2 4))))) (* -2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))) (+ (* 4 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4))))) (* 8 (/ (sqrt 2) (* (pow th 4) (- (pow a1 4) (pow a2 4))))))) (pow th 2))>
#<alt (* -2 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4)))))>
#<alt (/ (+ (* -4 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4))))) (* -2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))) (pow th 2))>
#<alt (/ (- (+ (* -8 (/ (sqrt 2) (* (pow th 4) (- (pow a1 4) (pow a2 4))))) (* -2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))) (* 4 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4)))))) (pow th 2))>
#<alt (/ (- (+ (* -16 (/ (sqrt 2) (* (pow th 6) (- (pow a1 4) (pow a2 4))))) (* -2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))) (+ (* 4 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4))))) (* 8 (/ (sqrt 2) (* (pow th 4) (- (pow a1 4) (pow a2 4))))))) (pow th 2))>
#<alt (* -1 (/ (sqrt 2) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))))>
#<alt (+ (* -1 (/ (sqrt 2) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))))) (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2)))))))>
#<alt (+ (* -1 (/ (sqrt 2) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))))) (* (pow a1 4) (- (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 12) (+ 1 (* -1/2 (pow th 2)))))) (/ (sqrt 2) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2))))))))>
#<alt (+ (* -1 (/ (sqrt 2) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))))) (* (pow a1 4) (- (* (pow a1 4) (- (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 16) (+ 1 (* -1/2 (pow th 2)))))) (/ (sqrt 2) (* (pow a2 12) (+ 1 (* -1/2 (pow th 2))))))) (/ (sqrt 2) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2))))))))>
#<alt (/ (sqrt 2) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))>
#<alt (/ (+ (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2)))) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))) (pow a1 4))>
#<alt (/ (- (+ (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2)))) (/ (* (pow a2 8) (sqrt 2)) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2)))))) (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2))))))) (pow a1 4))>
#<alt (/ (- (+ (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2)))) (/ (* (pow a2 12) (sqrt 2)) (* (pow a1 12) (+ 1 (* -1/2 (pow th 2)))))) (+ (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))) (* -1 (/ (* (pow a2 8) (sqrt 2)) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2)))))))) (pow a1 4))>
#<alt (/ (sqrt 2) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))>
#<alt (/ (+ (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2)))) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))) (pow a1 4))>
#<alt (/ (- (+ (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2)))) (/ (* (pow a2 8) (sqrt 2)) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2)))))) (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2))))))) (pow a1 4))>
#<alt (/ (- (+ (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2)))) (/ (* (pow a2 12) (sqrt 2)) (* (pow a1 12) (+ 1 (* -1/2 (pow th 2)))))) (+ (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))) (* -1 (/ (* (pow a2 8) (sqrt 2)) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2)))))))) (pow a1 4))>
#<alt (/ (sqrt 2) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))>
#<alt (+ (/ (sqrt 2) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2))))) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2))))))>
#<alt (+ (* (pow a2 4) (- (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 12) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (sqrt 2) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2)))))))) (/ (sqrt 2) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2))))))>
#<alt (+ (* (pow a2 4) (- (* (pow a2 4) (- (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 16) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (sqrt 2) (* (pow a1 12) (+ 1 (* -1/2 (pow th 2)))))))) (* -1 (/ (sqrt 2) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2)))))))) (/ (sqrt 2) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2))))))>
#<alt (* -1 (/ (sqrt 2) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))))>
#<alt (/ (+ (* -1 (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))))) (pow a2 4))>
#<alt (/ (- (+ (* -1 (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (* (pow a1 8) (sqrt 2)) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2))))))) (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))))) (pow a2 4))>
#<alt (/ (- (+ (* -1 (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (* (pow a1 12) (sqrt 2)) (* (pow a2 12) (+ 1 (* -1/2 (pow th 2))))))) (+ (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))) (/ (* (pow a1 8) (sqrt 2)) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2))))))) (pow a2 4))>
#<alt (* -1 (/ (sqrt 2) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))))>
#<alt (/ (+ (* -1 (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))))) (pow a2 4))>
#<alt (/ (- (+ (* -1 (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (* (pow a1 8) (sqrt 2)) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2))))))) (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))))) (pow a2 4))>
#<alt (/ (- (+ (* -1 (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (* (pow a1 12) (sqrt 2)) (* (pow a2 12) (+ 1 (* -1/2 (pow th 2))))))) (+ (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))) (/ (* (pow a1 8) (sqrt 2)) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2))))))) (pow a2 4))>
#<alt (sqrt 2)>
#<alt (+ (sqrt 2) (* 1/2 (* (pow th 2) (sqrt 2))))>
#<alt (+ (sqrt 2) (* (pow th 2) (- (* 1/4 (* (pow th 2) (sqrt 2))) (* -1/2 (sqrt 2)))))>
#<alt (+ (sqrt 2) (* (pow th 2) (- (* (pow th 2) (- (* 1/8 (* (pow th 2) (sqrt 2))) (* -1/4 (sqrt 2)))) (* -1/2 (sqrt 2)))))>
#<alt (* -2 (/ (sqrt 2) (pow th 2)))>
#<alt (/ (+ (* -4 (/ (sqrt 2) (pow th 2))) (* -2 (sqrt 2))) (pow th 2))>
#<alt (/ (- (+ (* -8 (/ (sqrt 2) (pow th 4))) (* -2 (sqrt 2))) (* 4 (/ (sqrt 2) (pow th 2)))) (pow th 2))>
#<alt (/ (- (+ (* -16 (/ (sqrt 2) (pow th 6))) (* -2 (sqrt 2))) (+ (* 4 (/ (sqrt 2) (pow th 2))) (* 8 (/ (sqrt 2) (pow th 4))))) (pow th 2))>
#<alt (* -2 (/ (sqrt 2) (pow th 2)))>
#<alt (/ (+ (* -4 (/ (sqrt 2) (pow th 2))) (* -2 (sqrt 2))) (pow th 2))>
#<alt (/ (- (+ (* -8 (/ (sqrt 2) (pow th 4))) (* -2 (sqrt 2))) (* 4 (/ (sqrt 2) (pow th 2)))) (pow th 2))>
#<alt (/ (- (+ (* -16 (/ (sqrt 2) (pow th 6))) (* -2 (sqrt 2))) (+ (* 4 (/ (sqrt 2) (pow th 2))) (* 8 (/ (sqrt 2) (pow th 4))))) (pow th 2))>
#<alt 1>
#<alt (+ 1 (* -1/2 (pow th 2)))>
#<alt (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))>
#<alt (+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (cos th)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (pow a2 2)>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* -1 (pow a2 4))>
#<alt (- (pow a1 4) (pow a2 4))>
#<alt (- (pow a1 4) (pow a2 4))>
#<alt (- (pow a1 4) (pow a2 4))>
#<alt (pow a1 4)>
#<alt (* (pow a1 4) (+ 1 (* -1 (/ (pow a2 4) (pow a1 4)))))>
#<alt (* (pow a1 4) (+ 1 (* -1 (/ (pow a2 4) (pow a1 4)))))>
#<alt (* (pow a1 4) (+ 1 (* -1 (/ (pow a2 4) (pow a1 4)))))>
#<alt (pow a1 4)>
#<alt (* (pow a1 4) (+ 1 (* -1 (/ (pow a2 4) (pow a1 4)))))>
#<alt (* (pow a1 4) (+ 1 (* -1 (/ (pow a2 4) (pow a1 4)))))>
#<alt (* (pow a1 4) (+ 1 (* -1 (/ (pow a2 4) (pow a1 4)))))>
#<alt (pow a1 4)>
#<alt (+ (* -1 (pow a2 4)) (pow a1 4))>
#<alt (+ (* -1 (pow a2 4)) (pow a1 4))>
#<alt (+ (* -1 (pow a2 4)) (pow a1 4))>
#<alt (* -1 (pow a2 4))>
#<alt (* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))>
#<alt (* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))>
#<alt (* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))>
#<alt (* -1 (pow a2 4))>
#<alt (* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))>
#<alt (* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))>
#<alt (* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))>
#<alt (* -1 (pow a2 2))>
#<alt (- (pow a1 2) (pow a2 2))>
#<alt (- (pow a1 2) (pow a2 2))>
#<alt (- (pow a1 2) (pow a2 2))>
#<alt (pow a1 2)>
#<alt (* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))>
#<alt (* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))>
#<alt (* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))>
#<alt (pow a1 2)>
#<alt (* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))>
#<alt (* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))>
#<alt (* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))>
#<alt (pow a1 2)>
#<alt (+ (* -1 (pow a2 2)) (pow a1 2))>
#<alt (+ (* -1 (pow a2 2)) (pow a1 2))>
#<alt (+ (* -1 (pow a2 2)) (pow a1 2))>
#<alt (* -1 (pow a2 2))>
#<alt (* (pow a2 2) (- (/ (pow a1 2) (pow a2 2)) 1))>
#<alt (* (pow a2 2) (- (/ (pow a1 2) (pow a2 2)) 1))>
#<alt (* (pow a2 2) (- (/ (pow a1 2) (pow a2 2)) 1))>
#<alt (* -1 (pow a2 2))>
#<alt (* (pow a2 2) (- (/ (pow a1 2) (pow a2 2)) 1))>
#<alt (* (pow a2 2) (- (/ (pow a1 2) (pow a2 2)) 1))>
#<alt (* (pow a2 2) (- (/ (pow a1 2) (pow a2 2)) 1))>
Calls

99 calls:

TimeVariablePointExpression
17.0ms
a2
@0
(/ a2 (sqrt 2))
7.0ms
a1
@0
(/ (/ 1 (/ (/ (sqrt 2) (+ 1 (* th (* -1/2 th)))) (- (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (* a2 a2))))) (- (* a1 a1) (* a2 a2)))
3.0ms
th
@-inf
(/ (/ (sqrt 2) (+ 1 (* th (* -1/2 th)))) (- (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (* a2 a2))))
2.0ms
th
@0
(/ (/ 1 (/ (/ (sqrt 2) (+ 1 (* th (* -1/2 th)))) (- (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (* a2 a2))))) (- (* a1 a1) (* a2 a2)))
1.0ms
a2
@0
(/ (/ 1 (/ (/ (sqrt 2) (+ 1 (* th (* -1/2 th)))) (- (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (* a2 a2))))) (- (* a1 a1) (* a2 a2)))

rewrite515.0ms (4.7%)

Memory
-50.0MiB live, 717.4MiB allocated
Algorithm
1×batch-egg-rewrite
Rules
5 112×accelerator-lowering-fma.f32
5 112×accelerator-lowering-fma.f64
4 746×/-lowering-/.f32
4 746×/-lowering-/.f64
4 592×*-lowering-*.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
037197
1213168
21386168
08328159
Stop Event
1×iter limit
1×node limit
Counts
22 → 982
Calls
Call 1
Inputs
(* (pow 2 -1/2) (* a2 (* a2 (cos th))))
(pow 2 -1/2)
(* a2 (* a2 (cos th)))
(* a2 (cos th))
(* (/ a2 (sqrt 2)) a2)
(/ a2 (sqrt 2))
(sqrt 2)
(* (sqrt 1/2) (+ (* a1 a1) (* a2 a2)))
(sqrt 1/2)
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
(/ (* a1 a1) (/ (sqrt 2) (+ 1 (* -1/2 (* th th)))))
(/ (sqrt 2) (+ 1 (* -1/2 (* th th))))
(/ (/ 1 (/ (/ (sqrt 2) (+ 1 (* th (* -1/2 th)))) (- (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (* a2 a2))))) (- (* a1 a1) (* a2 a2)))
(/ 1 (/ (/ (sqrt 2) (+ 1 (* th (* -1/2 th)))) (- (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (* a2 a2)))))
(/ (/ (sqrt 2) (+ 1 (* th (* -1/2 th)))) (- (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (* a2 a2))))
(/ (sqrt 2) (+ 1 (* th (* -1/2 th))))
(cos th)
(* a2 a2)
(* -1/2 (* th th))
(- (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (* a2 a2)))
(- (* a1 a1) (* a2 a2))
Outputs
(/.f64 (*.f64 a2 (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))
(*.f64 a2 (/.f64 (*.f64 a2 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (cos.f64 th)))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))))
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 (cos.f64 th))) a2)
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)) (cos.f64 th))
(*.f64 (*.f64 (*.f64 a2 (*.f64 a2 (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 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (cos.f64 th))
(*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a2)
(exp.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 4 binary64)) #s(literal -1/4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (+.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64))
(pow.f64 (exp.f64 #s(literal -1/2 binary64)) (log.f64 #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) #s(literal 1 binary64)))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(*.f64 (cos.f64 th) (*.f64 a2 a2))
(*.f64 (*.f64 a2 (cos.f64 th)) a2)
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(*.f64 a2 (cos.f64 th))
(*.f64 (cos.f64 th) a2)
(exp.f64 (+.f64 (*.f64 #s(literal 2 binary64) (log.f64 a2)) (*.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 2 binary64)))))
(exp.f64 (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 a2)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (-.f64 #s(literal 0 binary64) a2) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal -1 binary64))
(pow.f64 (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) #s(literal 2 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 a2 (/.f64 #s(literal 1 binary64) a2)))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a2)))
(*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))))
(*.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 a2 #s(literal -1 binary64)) (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) a2) #s(literal -1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (-.f64 #s(literal 0 binary64) a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal -1 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2)
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) a2) #s(literal -1 binary64)))
(*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal -1 binary64) (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
(*.f64 (-.f64 #s(literal 0 binary64) a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) a2))
(*.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(sqrt.f64 #s(literal 2 binary64))
(neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(+.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))
(+.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(-.f64 (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))))
(fma.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(fma.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(fma.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) a1) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 a1 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (*.f64 a1 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) a2) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) a2) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(fma.f64 (*.f64 a2 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (*.f64 a2 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))))))
(/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 1/2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 1/2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))))) (neg.f64 (-.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 1/2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 2 binary64))) (-.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 a2 a1)))
(*.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))))))
(*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)))
(*.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 a1 a2)))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 a2 a1)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)))
(*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 a1 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1)))
(*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(exp.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 1/2 binary64))
(pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(-.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(-.f64 (/.f64 #s(literal 0 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2))))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(-.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(fma.f64 a2 a2 (*.f64 a1 a1))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 a1 (neg.f64 (-.f64 #s(literal 0 binary64) a1)) (*.f64 a2 a2))
(fma.f64 a1 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (*.f64 a1 a1) #s(literal 1 binary64) (*.f64 a2 a2))
(fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 #s(literal 1 binary64) (*.f64 a1 a1) (*.f64 a2 a2))
(fma.f64 #s(literal 1 binary64) (*.f64 a2 a2) (*.f64 a1 a1))
(fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (-.f64 #s(literal 0 binary64) a2) (*.f64 a1 a1))
(fma.f64 (-.f64 #s(literal 0 binary64) a1) (-.f64 #s(literal 0 binary64) a1) (*.f64 a2 a2))
(fma.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)) (*.f64 a2 a2))
(fma.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)) (*.f64 a1 a1))
(fma.f64 (neg.f64 (-.f64 #s(literal 0 binary64) a1)) a1 (*.f64 a2 a2))
(fma.f64 (/.f64 a1 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (-.f64 a1 a2)) (/.f64 (*.f64 a1 a1) (+.f64 a2 a1)) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (+.f64 a2 a1)) (/.f64 (*.f64 a1 a1) (-.f64 a1 a2)) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 a1 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 a1 (+.f64 a2 a1)) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (-.f64 a1 a2)) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (-.f64 a1 a2)) (/.f64 a1 (+.f64 a2 a1)) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 a1 (-.f64 a1 a2)) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (+.f64 a2 a1)) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (+.f64 a2 a1)) (/.f64 a1 (-.f64 a1 a2)) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 a1 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (*.f64 a1 a1) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 a1 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 a1 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 a1 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 a1 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (pow.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (pow.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (*.f64 a1 a1))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 a1 a2) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2)))))))
(/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1)) (-.f64 a1 a2))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (neg.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (neg.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (+.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)))
(*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2)))))))
(*.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)))
(*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1)) (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 a2 a1)) (+.f64 a2 a1))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 a1 a2)) (-.f64 a1 a2))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 a2 a1)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 a1 a2)))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 a1 a2)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 a2 a1)))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 a2 a1)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 a1 a2)))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (-.f64 a1 a2)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 a2 a1)))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a1)))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))
(neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))
(/.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) #s(literal -1 binary64))
(pow.f64 a1 #s(literal 2 binary64))
(pow.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 a1)) #s(literal 2 binary64))
(*.f64 a1 a1)
(*.f64 a1 (neg.f64 (-.f64 #s(literal 0 binary64) a1)))
(*.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 a1 a1))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))
(*.f64 (-.f64 #s(literal 0 binary64) a1) (-.f64 #s(literal 0 binary64) a1))
(*.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)))
(*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) a1)) a1)
(+.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(+.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(+.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(fma.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(fma.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(fma.f64 #s(literal 1 binary64) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(fma.f64 #s(literal 1 binary64) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (*.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(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 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(fma.f64 (/.f64 a1 #s(literal -1 binary64)) (*.f64 a1 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(fma.f64 (/.f64 a1 #s(literal -1 binary64)) (*.f64 a1 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(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 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(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 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(neg.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(/.f64 a1 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) a1))
(/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)))))
(/.f64 #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 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64))))) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64)))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (/.f64 #s(literal 1 binary64) (*.f64 a1 a1))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(/.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64))))))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(/.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64)))))
(/.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))
(/.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) #s(literal 3 binary64)) (pow.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 3 binary64)) (pow.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))) (-.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (-.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))) (-.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) #s(literal -1 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 a1 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 (pow.f64 #s(literal 2 binary64) #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 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) #s(literal -1 binary64)))
(*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(*.f64 (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) a1)
(*.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th)))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64)))))))
(*.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(*.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th)))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64))))))
(*.f64 (*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(*.f64 (*.f64 a1 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(*.f64 (*.f64 a1 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (*.f64 a1 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (-.f64 #s(literal 0 binary64) a1) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))
(*.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) #s(literal -1 binary64)))
(*.f64 (/.f64 a1 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))))))) (/.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64))))))
(*.f64 (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (/.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(*.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64))))))
(*.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 a1 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))))))) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64))))))
(*.f64 (/.f64 a1 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (/.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64))))))
(*.f64 (/.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) #s(literal 1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th)))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64)))))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th)))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64)))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(*.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(-.f64 (/.f64 #s(literal 0 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(neg.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 a1 a2) (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (+.f64 a2 a1))))
(/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(/.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (+.f64 a2 a1)) (-.f64 a1 a2))
(/.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (neg.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (+.f64 a2 a1))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) #s(literal 1 binary64)))
(*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (-.f64 a1 a2)))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (pow.f64 (/.f64 (-.f64 a1 a2) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))) #s(literal -1 binary64)))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (-.f64 a1 a2)) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)))
(*.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a2 a1)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a2 a1)))
(*.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #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 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #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 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1)) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a1 a2)))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (+.f64 a2 a1)) (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (*.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (*.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (pow.f64 (/.f64 (+.f64 a2 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)) (pow.f64 (/.f64 (-.f64 a1 a2) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(*.f64 (pow.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1 binary64)) #s(literal -1 binary64)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)) (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (+.f64 a2 a1)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))) (-.f64 a1 a2)))
(*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(*.f64 (/.f64 #s(literal -1 binary64) (-.f64 a1 a2)) (/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))) (+.f64 a2 a1)))
(*.f64 (/.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a1 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1)))
(*.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 a2 a1)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 a1 a2)))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1))) (/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))) (-.f64 a1 a2)))
(*.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1))) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)))
(*.f64 (/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (+.f64 a2 a1)) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)))
(*.f64 (/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (+.f64 a2 a1)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(*.f64 (/.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1/2 binary64)) (+.f64 a2 a1)) (/.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1/2 binary64)) (-.f64 a1 a2)))
(*.f64 (/.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1/2 binary64)) (-.f64 a1 a2)) (/.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1/2 binary64)) (+.f64 a2 a1)))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a2 a1)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 a1 a2)))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 a2 a1)) (/.f64 (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (-.f64 a1 a2)))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 a1 a2)) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 a2 a1)))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (-.f64 a1 a2)) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1)))
(*.f64 (/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1/2 binary64)) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (/.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1/2 binary64)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a1 a2)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (+.f64 a2 a1)))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 a1 a2)) (/.f64 (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (+.f64 a2 a1)))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) #s(literal 1 binary64)) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64)))
(+.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(+.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(+.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) #s(literal 1 binary64)) (/.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) #s(literal 1 binary64)))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(fma.f64 a1 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(fma.f64 a1 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(fma.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(fma.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(fma.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(fma.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(fma.f64 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(fma.f64 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(fma.f64 (*.f64 a1 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(fma.f64 (*.f64 a1 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(fma.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(fma.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) #s(literal 1 binary64)) (*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(fma.f64 (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))))))) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64))))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(fma.f64 (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))))))) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(fma.f64 (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(fma.f64 (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(fma.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(fma.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))))))) (/.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64))))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))))))) (/.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (/.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (/.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))))))) (/.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64))))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))))))) (/.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (/.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (/.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 #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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))) #s(literal -1 binary64))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (neg.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))) (-.f64 (*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))) (+.f64 (*.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))) (*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))) (-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))) (*.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))) (+.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(*.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (pow.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))
(*.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))))))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64))))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(*.f64 (neg.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (neg.f64 (*.f64 (log.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64))))
(-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(-.f64 (/.f64 #s(literal 0 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(/.f64 (neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(/.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) #s(literal -1 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))) #s(literal -1 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th)))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64)))))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (pow.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (pow.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th)))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th)))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th)))))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #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 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th)))))) #s(literal 1 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))) #s(literal 1 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)))
(*.f64 (pow.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) #s(literal 1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))))
(*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th)))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64)))))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th)))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64)))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(*.f64 (pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(cos.f64 th)
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a2)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 a2)) #s(literal 1 binary64)))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(pow.f64 a2 #s(literal 2 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 a2)) #s(literal 2 binary64))
(*.f64 a2 a2)
(*.f64 #s(literal 1 binary64) (*.f64 a2 a2))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(*.f64 (-.f64 #s(literal 0 binary64) a2) (-.f64 #s(literal 0 binary64) a2))
(*.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)))
(*.f64 (pow.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)) (pow.f64 (*.f64 a2 a2) #s(literal 1/2 binary64)))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(*.f64 th (*.f64 #s(literal -1/2 binary64) th))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(*.f64 (*.f64 th th) #s(literal -1/2 binary64))
(*.f64 (*.f64 #s(literal -1/2 binary64) th) th)
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 1 binary64))
(+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(+.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)))
(-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))
(-.f64 #s(literal 0 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) #s(literal 1 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) #s(literal 1 binary64)))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)))
(fma.f64 a2 (*.f64 a2 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))
(fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(fma.f64 (*.f64 a1 a1) (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(fma.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))
(fma.f64 (*.f64 a1 (*.f64 a1 a1)) a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(fma.f64 #s(literal -1 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 a2 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))
(fma.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(fma.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))
(fma.f64 (*.f64 a2 (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) a2) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))
(fma.f64 (*.f64 a2 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) a2 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))
(neg.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(pow.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal 1 binary64))
(*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 #s(literal -1 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(*.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(+.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))
(+.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(+.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(-.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(-.f64 (*.f64 a1 a1) (/.f64 (*.f64 a2 a2) #s(literal 1 binary64)))
(-.f64 #s(literal 0 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(-.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)) (/.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 1 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 1 binary64)))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(fma.f64 a2 (-.f64 #s(literal 0 binary64) a2) (*.f64 a1 a1))
(fma.f64 a1 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(fma.f64 a1 (neg.f64 (-.f64 #s(literal 0 binary64) a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(fma.f64 a1 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (*.f64 a1 a1) #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(fma.f64 (*.f64 a1 a1) (/.f64 (*.f64 a1 a1) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 #s(literal 1 binary64) (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 #s(literal -1 binary64) (*.f64 a2 a2) (*.f64 a1 a1))
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) a2 (*.f64 a1 a1))
(fma.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(fma.f64 (-.f64 #s(literal 0 binary64) a1) (-.f64 #s(literal 0 binary64) a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(fma.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(fma.f64 (neg.f64 (-.f64 #s(literal 0 binary64) a1)) a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(fma.f64 (/.f64 a1 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 a1 a1) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 a1 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 a1 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 a1 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 a1 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 a1) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (*.f64 a1 a1) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 a1 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 a1 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(neg.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)) #s(literal -1 binary64))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))))
(/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (*.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (+.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (*.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))) (+.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2))))
(*.f64 (+.f64 a2 a1) (-.f64 a1 a2))
(*.f64 (+.f64 a2 a1) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(*.f64 (-.f64 a1 a2) (+.f64 a2 a1))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 a2 a1))) (-.f64 a1 a2))

simplify541.0ms (4.9%)

Memory
6.7MiB live, 720.0MiB allocated
Algorithm
1×egg-herbie
Rules
8 952×accelerator-lowering-fma.f32
8 952×accelerator-lowering-fma.f64
5 630×*-lowering-*.f32
5 630×*-lowering-*.f64
3 828×/-lowering-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03606551
111256214
236155863
083365581
Stop Event
1×iter limit
1×node limit
Counts
396 → 396
Calls
Call 1
Inputs
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (sqrt 1/2))
(+ (* -1/2 (* (pow a2 2) (* (pow th 2) (sqrt 1/2)))) (* (pow a2 2) (sqrt 1/2)))
(+ (* (pow a2 2) (sqrt 1/2)) (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 1/2))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 1/2)))))))
(+ (* (pow a2 2) (sqrt 1/2)) (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 1/2))) (* (pow th 2) (+ (* -1/720 (* (pow a2 2) (* (pow th 2) (sqrt 1/2)))) (* 1/24 (* (pow a2 2) (sqrt 1/2))))))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(pow a2 2)
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* 1/24 (* (pow a2 2) (pow th 2))))) (pow a2 2))
(+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* (pow th 2) (+ (* -1/720 (* (pow a2 2) (pow th 2))) (* 1/24 (pow a2 2)))))) (pow a2 2))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
a2
(+ a2 (* -1/2 (* a2 (pow th 2))))
(+ a2 (* (pow th 2) (+ (* -1/2 a2) (* 1/24 (* a2 (pow th 2))))))
(+ a2 (* (pow th 2) (+ (* -1/2 a2) (* (pow th 2) (+ (* -1/720 (* a2 (pow th 2))) (* 1/24 a2))))))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(* a2 (cos th))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(* (pow a2 2) (sqrt 1/2))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(* (pow a1 2) (sqrt 1/2))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (sqrt 1/2))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (sqrt 1/2))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(* (pow a2 2) (sqrt 1/2))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(* (pow a2 2) (sqrt 1/2))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(pow a2 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2)))
(* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2)))
(* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(sqrt 2)
(+ (sqrt 2) (* 1/2 (* (pow th 2) (sqrt 2))))
(+ (sqrt 2) (* (pow th 2) (- (* 1/4 (* (pow th 2) (sqrt 2))) (* -1/2 (sqrt 2)))))
(+ (sqrt 2) (* (pow th 2) (- (* (pow th 2) (- (* 1/8 (* (pow th 2) (sqrt 2))) (* -1/4 (sqrt 2)))) (* -1/2 (sqrt 2)))))
(* -2 (/ (sqrt 2) (pow th 2)))
(/ (+ (* -4 (/ (sqrt 2) (pow th 2))) (* -2 (sqrt 2))) (pow th 2))
(/ (- (+ (* -8 (/ (sqrt 2) (pow th 4))) (* -2 (sqrt 2))) (* 4 (/ (sqrt 2) (pow th 2)))) (pow th 2))
(/ (- (+ (* -16 (/ (sqrt 2) (pow th 6))) (* -2 (sqrt 2))) (+ (* 4 (/ (sqrt 2) (pow th 2))) (* 8 (/ (sqrt 2) (pow th 4))))) (pow th 2))
(* -2 (/ (sqrt 2) (pow th 2)))
(/ (+ (* -4 (/ (sqrt 2) (pow th 2))) (* -2 (sqrt 2))) (pow th 2))
(/ (- (+ (* -8 (/ (sqrt 2) (pow th 4))) (* -2 (sqrt 2))) (* 4 (/ (sqrt 2) (pow th 2)))) (pow th 2))
(/ (- (+ (* -16 (/ (sqrt 2) (pow th 6))) (* -2 (sqrt 2))) (+ (* 4 (/ (sqrt 2) (pow th 2))) (* 8 (/ (sqrt 2) (pow th 4))))) (pow th 2))
(/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))
(- (+ (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a2 4) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))
(- (+ (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a2 4) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))
(- (+ (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a2 4) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))
(* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))) (/ (pow a2 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))) (/ (pow a2 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))) (/ (pow a2 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))))
(* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))) (/ (pow a2 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))) (/ (pow a2 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))) (/ (pow a2 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(/ (- (pow a1 4) (pow a2 4)) (sqrt 2))
(- (+ (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (sqrt 2))) (/ (pow a1 4) (sqrt 2))) (/ (pow a2 4) (sqrt 2)))
(- (+ (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (sqrt 2))) (/ (pow a1 4) (sqrt 2))) (/ (pow a2 4) (sqrt 2)))
(- (+ (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (sqrt 2))) (/ (pow a1 4) (sqrt 2))) (/ (pow a2 4) (sqrt 2)))
(* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (sqrt 2)))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (sqrt 2))) (/ (pow a1 4) (* (pow th 2) (sqrt 2)))) (/ (pow a2 4) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (sqrt 2))) (/ (pow a1 4) (* (pow th 2) (sqrt 2)))) (/ (pow a2 4) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (sqrt 2))) (/ (pow a1 4) (* (pow th 2) (sqrt 2)))) (/ (pow a2 4) (* (pow th 2) (sqrt 2)))))
(* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (sqrt 2)))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (sqrt 2))) (/ (pow a1 4) (* (pow th 2) (sqrt 2)))) (/ (pow a2 4) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (sqrt 2))) (/ (pow a1 4) (* (pow th 2) (sqrt 2)))) (/ (pow a2 4) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (sqrt 2))) (/ (pow a1 4) (* (pow th 2) (sqrt 2)))) (/ (pow a2 4) (* (pow th 2) (sqrt 2)))))
(* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (* (pow a1 4) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (* (pow a1 4) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (* (pow a1 4) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(* (pow a1 4) (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 4) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(* (pow a1 4) (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 4) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(* (pow a1 4) (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 4) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(* (pow a1 4) (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 4) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(* (pow a1 4) (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 4) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(* (pow a1 4) (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 4) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(* (pow a2 4) (+ (* -1 (/ (+ 1 (* -1/2 (pow th 2))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 4) (sqrt 2)))))
(* (pow a2 4) (+ (* -1 (/ (+ 1 (* -1/2 (pow th 2))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 4) (sqrt 2)))))
(* (pow a2 4) (+ (* -1 (/ (+ 1 (* -1/2 (pow th 2))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 4) (sqrt 2)))))
(* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(* (pow a2 4) (+ (* -1 (/ (+ 1 (* -1/2 (pow th 2))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 4) (sqrt 2)))))
(* (pow a2 4) (+ (* -1 (/ (+ 1 (* -1/2 (pow th 2))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 4) (sqrt 2)))))
(* (pow a2 4) (+ (* -1 (/ (+ 1 (* -1/2 (pow th 2))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 4) (sqrt 2)))))
(/ (sqrt 2) (- (pow a1 4) (pow a2 4)))
(+ (* 1/2 (/ (* (pow th 2) (sqrt 2)) (- (pow a1 4) (pow a2 4)))) (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))
(+ (* (pow th 2) (- (* 1/4 (/ (* (pow th 2) (sqrt 2)) (- (pow a1 4) (pow a2 4)))) (* -1/2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4)))))) (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))
(+ (* (pow th 2) (- (* (pow th 2) (- (* 1/8 (/ (* (pow th 2) (sqrt 2)) (- (pow a1 4) (pow a2 4)))) (* -1/4 (/ (sqrt 2) (- (pow a1 4) (pow a2 4)))))) (* -1/2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4)))))) (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))
(* -2 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4)))))
(/ (+ (* -4 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4))))) (* -2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))) (pow th 2))
(/ (- (+ (* -8 (/ (sqrt 2) (* (pow th 4) (- (pow a1 4) (pow a2 4))))) (* -2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))) (* 4 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4)))))) (pow th 2))
(/ (- (+ (* -16 (/ (sqrt 2) (* (pow th 6) (- (pow a1 4) (pow a2 4))))) (* -2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))) (+ (* 4 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4))))) (* 8 (/ (sqrt 2) (* (pow th 4) (- (pow a1 4) (pow a2 4))))))) (pow th 2))
(* -2 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4)))))
(/ (+ (* -4 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4))))) (* -2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))) (pow th 2))
(/ (- (+ (* -8 (/ (sqrt 2) (* (pow th 4) (- (pow a1 4) (pow a2 4))))) (* -2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))) (* 4 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4)))))) (pow th 2))
(/ (- (+ (* -16 (/ (sqrt 2) (* (pow th 6) (- (pow a1 4) (pow a2 4))))) (* -2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))) (+ (* 4 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4))))) (* 8 (/ (sqrt 2) (* (pow th 4) (- (pow a1 4) (pow a2 4))))))) (pow th 2))
(* -1 (/ (sqrt 2) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))))
(+ (* -1 (/ (sqrt 2) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))))) (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2)))))))
(+ (* -1 (/ (sqrt 2) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))))) (* (pow a1 4) (- (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 12) (+ 1 (* -1/2 (pow th 2)))))) (/ (sqrt 2) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2))))))))
(+ (* -1 (/ (sqrt 2) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))))) (* (pow a1 4) (- (* (pow a1 4) (- (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 16) (+ 1 (* -1/2 (pow th 2)))))) (/ (sqrt 2) (* (pow a2 12) (+ 1 (* -1/2 (pow th 2))))))) (/ (sqrt 2) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2))))))))
(/ (sqrt 2) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))
(/ (+ (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2)))) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))) (pow a1 4))
(/ (- (+ (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2)))) (/ (* (pow a2 8) (sqrt 2)) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2)))))) (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2))))))) (pow a1 4))
(/ (- (+ (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2)))) (/ (* (pow a2 12) (sqrt 2)) (* (pow a1 12) (+ 1 (* -1/2 (pow th 2)))))) (+ (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))) (* -1 (/ (* (pow a2 8) (sqrt 2)) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2)))))))) (pow a1 4))
(/ (sqrt 2) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))
(/ (+ (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2)))) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))) (pow a1 4))
(/ (- (+ (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2)))) (/ (* (pow a2 8) (sqrt 2)) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2)))))) (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2))))))) (pow a1 4))
(/ (- (+ (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2)))) (/ (* (pow a2 12) (sqrt 2)) (* (pow a1 12) (+ 1 (* -1/2 (pow th 2)))))) (+ (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))) (* -1 (/ (* (pow a2 8) (sqrt 2)) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2)))))))) (pow a1 4))
(/ (sqrt 2) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))
(+ (/ (sqrt 2) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2))))) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2))))))
(+ (* (pow a2 4) (- (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 12) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (sqrt 2) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2)))))))) (/ (sqrt 2) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2))))))
(+ (* (pow a2 4) (- (* (pow a2 4) (- (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 16) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (sqrt 2) (* (pow a1 12) (+ 1 (* -1/2 (pow th 2)))))))) (* -1 (/ (sqrt 2) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2)))))))) (/ (sqrt 2) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2))))))
(* -1 (/ (sqrt 2) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))))
(/ (+ (* -1 (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))))) (pow a2 4))
(/ (- (+ (* -1 (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (* (pow a1 8) (sqrt 2)) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2))))))) (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))))) (pow a2 4))
(/ (- (+ (* -1 (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (* (pow a1 12) (sqrt 2)) (* (pow a2 12) (+ 1 (* -1/2 (pow th 2))))))) (+ (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))) (/ (* (pow a1 8) (sqrt 2)) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2))))))) (pow a2 4))
(* -1 (/ (sqrt 2) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))))
(/ (+ (* -1 (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))))) (pow a2 4))
(/ (- (+ (* -1 (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (* (pow a1 8) (sqrt 2)) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2))))))) (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))))) (pow a2 4))
(/ (- (+ (* -1 (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (* (pow a1 12) (sqrt 2)) (* (pow a2 12) (+ 1 (* -1/2 (pow th 2))))))) (+ (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))) (/ (* (pow a1 8) (sqrt 2)) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2))))))) (pow a2 4))
(sqrt 2)
(+ (sqrt 2) (* 1/2 (* (pow th 2) (sqrt 2))))
(+ (sqrt 2) (* (pow th 2) (- (* 1/4 (* (pow th 2) (sqrt 2))) (* -1/2 (sqrt 2)))))
(+ (sqrt 2) (* (pow th 2) (- (* (pow th 2) (- (* 1/8 (* (pow th 2) (sqrt 2))) (* -1/4 (sqrt 2)))) (* -1/2 (sqrt 2)))))
(* -2 (/ (sqrt 2) (pow th 2)))
(/ (+ (* -4 (/ (sqrt 2) (pow th 2))) (* -2 (sqrt 2))) (pow th 2))
(/ (- (+ (* -8 (/ (sqrt 2) (pow th 4))) (* -2 (sqrt 2))) (* 4 (/ (sqrt 2) (pow th 2)))) (pow th 2))
(/ (- (+ (* -16 (/ (sqrt 2) (pow th 6))) (* -2 (sqrt 2))) (+ (* 4 (/ (sqrt 2) (pow th 2))) (* 8 (/ (sqrt 2) (pow th 4))))) (pow th 2))
(* -2 (/ (sqrt 2) (pow th 2)))
(/ (+ (* -4 (/ (sqrt 2) (pow th 2))) (* -2 (sqrt 2))) (pow th 2))
(/ (- (+ (* -8 (/ (sqrt 2) (pow th 4))) (* -2 (sqrt 2))) (* 4 (/ (sqrt 2) (pow th 2)))) (pow th 2))
(/ (- (+ (* -16 (/ (sqrt 2) (pow th 6))) (* -2 (sqrt 2))) (+ (* 4 (/ (sqrt 2) (pow th 2))) (* 8 (/ (sqrt 2) (pow th 4))))) (pow th 2))
1
(+ 1 (* -1/2 (pow th 2)))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(pow a2 2)
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1 (pow a2 4))
(- (pow a1 4) (pow a2 4))
(- (pow a1 4) (pow a2 4))
(- (pow a1 4) (pow a2 4))
(pow a1 4)
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 4) (pow a1 4)))))
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 4) (pow a1 4)))))
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 4) (pow a1 4)))))
(pow a1 4)
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 4) (pow a1 4)))))
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 4) (pow a1 4)))))
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 4) (pow a1 4)))))
(pow a1 4)
(+ (* -1 (pow a2 4)) (pow a1 4))
(+ (* -1 (pow a2 4)) (pow a1 4))
(+ (* -1 (pow a2 4)) (pow a1 4))
(* -1 (pow a2 4))
(* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))
(* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))
(* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))
(* -1 (pow a2 4))
(* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))
(* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))
(* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))
(* -1 (pow a2 2))
(- (pow a1 2) (pow a2 2))
(- (pow a1 2) (pow a2 2))
(- (pow a1 2) (pow a2 2))
(pow a1 2)
(* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(pow a1 2)
(* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(pow a1 2)
(+ (* -1 (pow a2 2)) (pow a1 2))
(+ (* -1 (pow a2 2)) (pow a1 2))
(+ (* -1 (pow a2 2)) (pow a1 2))
(* -1 (pow a2 2))
(* (pow a2 2) (- (/ (pow a1 2) (pow a2 2)) 1))
(* (pow a2 2) (- (/ (pow a1 2) (pow a2 2)) 1))
(* (pow a2 2) (- (/ (pow a1 2) (pow a2 2)) 1))
(* -1 (pow a2 2))
(* (pow a2 2) (- (/ (pow a1 2) (pow a2 2)) 1))
(* (pow a2 2) (- (/ (pow a1 2) (pow a2 2)) 1))
(* (pow a2 2) (- (/ (pow a1 2) (pow a2 2)) 1))
Outputs
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (sqrt 1/2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(+ (* -1/2 (* (pow a2 2) (* (pow th 2) (sqrt 1/2)))) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(+ (* (pow a2 2) (sqrt 1/2)) (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 1/2))) (* 1/24 (* (pow a2 2) (* (pow th 2) (sqrt 1/2)))))))
(+.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(+ (* (pow a2 2) (sqrt 1/2)) (* (pow th 2) (+ (* -1/2 (* (pow a2 2) (sqrt 1/2))) (* (pow th 2) (+ (* -1/720 (* (pow a2 2) (* (pow th 2) (sqrt 1/2)))) (* 1/24 (* (pow a2 2) (sqrt 1/2))))))))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))) (*.f64 (*.f64 th th) (*.f64 th th))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(pow a2 2)
(*.f64 a2 a2)
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* 1/24 (* (pow a2 2) (pow th 2))))) (pow a2 2))
(+.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 th th))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* (pow th 2) (+ (* -1/720 (* (pow a2 2) (pow th 2))) (* 1/24 (pow a2 2)))))) (pow a2 2))
(+.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (+.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 th th))) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))))))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
a2
(+ a2 (* -1/2 (* a2 (pow th 2))))
(*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(+ a2 (* (pow th 2) (+ (* -1/2 a2) (* 1/24 (* a2 (pow th 2))))))
(+.f64 a2 (*.f64 (*.f64 th th) (*.f64 a2 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(+ a2 (* (pow th 2) (+ (* -1/2 a2) (* (pow th 2) (+ (* -1/720 (* a2 (pow th 2))) (* 1/24 a2))))))
(+.f64 a2 (*.f64 (*.f64 th th) (+.f64 (*.f64 a2 #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 (*.f64 th th)) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))))))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (sqrt 1/2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(* (pow a1 2) (sqrt 1/2))
(*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
(* (pow a1 2) (sqrt 1/2))
(*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
(* (pow a1 2) (sqrt 1/2))
(*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(* (pow a2 2) (sqrt 1/2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 a2 a2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 a2 a2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 a2 a2))))
(* (pow a2 2) (sqrt 1/2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 a2 a2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 a2 a2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 a2 a2))))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)))
(pow a1 2)
(*.f64 a1 a1)
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2)))
(*.f64 (*.f64 a1 a1) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) th) th))))
(* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) th) th))))
(* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) th) th))))
(* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2)))
(*.f64 (*.f64 a1 a1) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))))
(* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) th) th))))
(* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) th) th))))
(* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (/ (pow a1 2) (* (pow th 2) (sqrt 2)))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) th) th))))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
(+ (sqrt 2) (* 1/2 (* (pow th 2) (sqrt 2))))
(*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (sqrt 2) (* (pow th 2) (- (* 1/4 (* (pow th 2) (sqrt 2))) (* -1/2 (sqrt 2)))))
(+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 th th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))))
(+ (sqrt 2) (* (pow th 2) (- (* (pow th 2) (- (* 1/8 (* (pow th 2) (sqrt 2))) (* -1/4 (sqrt 2)))) (* -1/2 (sqrt 2)))))
(+.f64 (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 th th) #s(literal 1/8 binary64)) #s(literal 1/4 binary64)))))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(* -2 (/ (sqrt 2) (pow th 2)))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th)
(/ (+ (* -4 (/ (sqrt 2) (pow th 2))) (* -2 (sqrt 2))) (pow th 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) th) #s(literal -4 binary64))) (*.f64 th th))
(/ (- (+ (* -8 (/ (sqrt 2) (pow th 4))) (* -2 (sqrt 2))) (* 4 (/ (sqrt 2) (pow th 2)))) (pow th 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) (+.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) th) #s(literal -4 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -8 binary64)) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 th th))
(/ (- (+ (* -16 (/ (sqrt 2) (pow th 6))) (* -2 (sqrt 2))) (+ (* 4 (/ (sqrt 2) (pow th 2))) (* 8 (/ (sqrt 2) (pow th 4))))) (pow th 2))
(/.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -16 binary64)) (pow.f64 th #s(literal 6 binary64)))) (+.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) th) #s(literal -4 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -8 binary64)) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 th th))
(* -2 (/ (sqrt 2) (pow th 2)))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th)
(/ (+ (* -4 (/ (sqrt 2) (pow th 2))) (* -2 (sqrt 2))) (pow th 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) th) #s(literal -4 binary64))) (*.f64 th th))
(/ (- (+ (* -8 (/ (sqrt 2) (pow th 4))) (* -2 (sqrt 2))) (* 4 (/ (sqrt 2) (pow th 2)))) (pow th 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) (+.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) th) #s(literal -4 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -8 binary64)) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 th th))
(/ (- (+ (* -16 (/ (sqrt 2) (pow th 6))) (* -2 (sqrt 2))) (+ (* 4 (/ (sqrt 2) (pow th 2))) (* 8 (/ (sqrt 2) (pow th 4))))) (pow th 2))
(/.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -16 binary64)) (pow.f64 th #s(literal 6 binary64)))) (+.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) th) #s(literal -4 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -8 binary64)) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 th th))
(/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))
(/.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(- (+ (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a2 4) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(- (+ (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a2 4) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(- (+ (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a2 4) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))) (/ (pow a2 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (/.f64 (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 th th)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 th th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))) (/ (pow a2 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (/.f64 (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 th th)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 th th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))) (/ (pow a2 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (/.f64 (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 th th)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 th th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))))
(* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))) (/ (pow a2 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (/.f64 (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 th th)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 th th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))) (/ (pow a2 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (/.f64 (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 th th)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 th th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (* (sqrt 2) (- (pow a1 2) (pow a2 2))))) (/ (pow a1 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))) (/ (pow a2 4) (* (pow th 2) (* (sqrt 2) (- (pow a1 2) (pow a2 2)))))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (/.f64 (/.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 th th)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 th th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (*.f64 (/.f64 (/.f64 (*.f64 a2 a2) a1) a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (*.f64 (/.f64 (/.f64 (*.f64 a2 a2) a1) a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (*.f64 (/.f64 (/.f64 (*.f64 a2 a2) a1) a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (*.f64 (/.f64 (/.f64 (*.f64 a2 a2) a1) a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (*.f64 (/.f64 (/.f64 (*.f64 a2 a2) a1) a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 2) (sqrt 2))))))
(+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (*.f64 (/.f64 (/.f64 (*.f64 a2 a2) a1) a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)) (/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow a2 2) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (+ (/ 1 (sqrt 2)) (/ (* (pow a1 2) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(/ (- (pow a1 4) (pow a2 4)) (sqrt 2))
(/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(- (+ (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (sqrt 2))) (/ (pow a1 4) (sqrt 2))) (/ (pow a2 4) (sqrt 2)))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(- (+ (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (sqrt 2))) (/ (pow a1 4) (sqrt 2))) (/ (pow a2 4) (sqrt 2)))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(- (+ (* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (sqrt 2))) (/ (pow a1 4) (sqrt 2))) (/ (pow a2 4) (sqrt 2)))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (sqrt 2)))
(/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (sqrt 2))) (/ (pow a1 4) (* (pow th 2) (sqrt 2)))) (/ (pow a2 4) (* (pow th 2) (sqrt 2)))))
(*.f64 th (*.f64 th (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) th) th)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) th) th))))))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (sqrt 2))) (/ (pow a1 4) (* (pow th 2) (sqrt 2)))) (/ (pow a2 4) (* (pow th 2) (sqrt 2)))))
(*.f64 th (*.f64 th (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) th) th)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) th) th))))))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (sqrt 2))) (/ (pow a1 4) (* (pow th 2) (sqrt 2)))) (/ (pow a2 4) (* (pow th 2) (sqrt 2)))))
(*.f64 th (*.f64 th (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) th) th)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) th) th))))))
(* -1/2 (/ (* (pow th 2) (- (pow a1 4) (pow a2 4))) (sqrt 2)))
(/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (sqrt 2))) (/ (pow a1 4) (* (pow th 2) (sqrt 2)))) (/ (pow a2 4) (* (pow th 2) (sqrt 2)))))
(*.f64 th (*.f64 th (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) th) th)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) th) th))))))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (sqrt 2))) (/ (pow a1 4) (* (pow th 2) (sqrt 2)))) (/ (pow a2 4) (* (pow th 2) (sqrt 2)))))
(*.f64 th (*.f64 th (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) th) th)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) th) th))))))
(* (pow th 2) (- (+ (* -1/2 (/ (- (pow a1 4) (pow a2 4)) (sqrt 2))) (/ (pow a1 4) (* (pow th 2) (sqrt 2)))) (/ (pow a2 4) (* (pow th 2) (sqrt 2)))))
(*.f64 th (*.f64 th (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) th) th)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) th) th))))))
(* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (* (pow a1 4) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(-.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (* (pow a1 4) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(-.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (* (pow a1 4) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(-.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 4) (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 4) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64))))))
(* (pow a1 4) (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 4) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64))))))
(* (pow a1 4) (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 4) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64))))))
(/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 4) (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 4) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64))))))
(* (pow a1 4) (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 4) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64))))))
(* (pow a1 4) (+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a1 4) (sqrt 2)))) (+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (pow.f64 a2 #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64))))))
(/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 4) (+ (* -1 (/ (+ 1 (* -1/2 (pow th 2))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 4) (sqrt 2)))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))
(* (pow a2 4) (+ (* -1 (/ (+ 1 (* -1/2 (pow th 2))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 4) (sqrt 2)))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))
(* (pow a2 4) (+ (* -1 (/ (+ 1 (* -1/2 (pow th 2))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 4) (sqrt 2)))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))
(* -1 (/ (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 4) (+ (* -1 (/ (+ 1 (* -1/2 (pow th 2))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 4) (sqrt 2)))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))
(* (pow a2 4) (+ (* -1 (/ (+ 1 (* -1/2 (pow th 2))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 4) (sqrt 2)))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))
(* (pow a2 4) (+ (* -1 (/ (+ 1 (* -1/2 (pow th 2))) (sqrt 2))) (/ (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))) (* (pow a2 4) (sqrt 2)))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))
(/ (sqrt 2) (- (pow a1 4) (pow a2 4)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))
(+ (* 1/2 (/ (* (pow th 2) (sqrt 2)) (- (pow a1 4) (pow a2 4)))) (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))
(*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))
(+ (* (pow th 2) (- (* 1/4 (/ (* (pow th 2) (sqrt 2)) (- (pow a1 4) (pow a2 4)))) (* -1/2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4)))))) (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))
(+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (*.f64 th th) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (+.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))))
(+ (* (pow th 2) (- (* (pow th 2) (- (* 1/8 (/ (* (pow th 2) (sqrt 2)) (- (pow a1 4) (pow a2 4)))) (* -1/4 (/ (sqrt 2) (- (pow a1 4) (pow a2 4)))))) (* -1/2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4)))))) (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))
(+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (+.f64 (*.f64 (*.f64 th th) #s(literal 1/8 binary64)) #s(literal 1/4 binary64))))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))))
(* -2 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4)))))
(/.f64 (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))
(/ (+ (* -4 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4))))) (* -2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))) (pow th 2))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (+.f64 (/.f64 #s(literal -4 binary64) (*.f64 th th)) #s(literal -2 binary64))) (*.f64 th th))
(/ (- (+ (* -8 (/ (sqrt 2) (* (pow th 4) (- (pow a1 4) (pow a2 4))))) (* -2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))) (* 4 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4)))))) (pow th 2))
(/.f64 (+.f64 (/.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) th) #s(literal -4 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (+.f64 #s(literal -2 binary64) (/.f64 #s(literal -8 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (*.f64 th th))
(/ (- (+ (* -16 (/ (sqrt 2) (* (pow th 6) (- (pow a1 4) (pow a2 4))))) (* -2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))) (+ (* 4 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4))))) (* 8 (/ (sqrt 2) (* (pow th 4) (- (pow a1 4) (pow a2 4))))))) (pow th 2))
(/.f64 (+.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (+.f64 #s(literal -2 binary64) (/.f64 #s(literal -16 binary64) (pow.f64 th #s(literal 6 binary64))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (+.f64 (/.f64 #s(literal -8 binary64) (*.f64 (*.f64 th th) (*.f64 th th))) (/.f64 #s(literal -4 binary64) (*.f64 th th))))) (*.f64 th th))
(* -2 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4)))))
(/.f64 (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))
(/ (+ (* -4 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4))))) (* -2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))) (pow th 2))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (+.f64 (/.f64 #s(literal -4 binary64) (*.f64 th th)) #s(literal -2 binary64))) (*.f64 th th))
(/ (- (+ (* -8 (/ (sqrt 2) (* (pow th 4) (- (pow a1 4) (pow a2 4))))) (* -2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))) (* 4 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4)))))) (pow th 2))
(/.f64 (+.f64 (/.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) th) #s(literal -4 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (+.f64 #s(literal -2 binary64) (/.f64 #s(literal -8 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (*.f64 th th))
(/ (- (+ (* -16 (/ (sqrt 2) (* (pow th 6) (- (pow a1 4) (pow a2 4))))) (* -2 (/ (sqrt 2) (- (pow a1 4) (pow a2 4))))) (+ (* 4 (/ (sqrt 2) (* (pow th 2) (- (pow a1 4) (pow a2 4))))) (* 8 (/ (sqrt 2) (* (pow th 4) (- (pow a1 4) (pow a2 4))))))) (pow th 2))
(/.f64 (+.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (+.f64 #s(literal -2 binary64) (/.f64 #s(literal -16 binary64) (pow.f64 th #s(literal 6 binary64))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (+.f64 (/.f64 #s(literal -8 binary64) (*.f64 (*.f64 th th) (*.f64 th th))) (/.f64 #s(literal -4 binary64) (*.f64 th th))))) (*.f64 th th))
(* -1 (/ (sqrt 2) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64))))
(+ (* -1 (/ (sqrt 2) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))))) (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2)))))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (/.f64 #s(literal -1 binary64) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 8 binary64)))))
(+ (* -1 (/ (sqrt 2) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))))) (* (pow a1 4) (- (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 12) (+ 1 (* -1/2 (pow th 2)))))) (/ (sqrt 2) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2))))))))
(+.f64 (neg.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (pow.f64 a2 #s(literal 12 binary64))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (/.f64 #s(literal -1 binary64) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 8 binary64))))))
(+ (* -1 (/ (sqrt 2) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))))) (* (pow a1 4) (- (* (pow a1 4) (- (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 16) (+ 1 (* -1/2 (pow th 2)))))) (/ (sqrt 2) (* (pow a2 12) (+ 1 (* -1/2 (pow th 2))))))) (/ (sqrt 2) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2))))))))
(+.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal -1 binary64)))) (pow.f64 a2 #s(literal 12 binary64))) (/.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (pow.f64 a2 #s(literal 16 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (/.f64 #s(literal -1 binary64) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 8 binary64))))))
(/ (sqrt 2) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (pow.f64 a1 #s(literal 4 binary64)))
(/ (+ (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2)))) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))) (pow a1 4))
(/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (pow.f64 a1 #s(literal 4 binary64)))
(/ (- (+ (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2)))) (/ (* (pow a2 8) (sqrt 2)) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2)))))) (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2))))))) (pow a1 4))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 8 binary64)) (pow.f64 a1 #s(literal 8 binary64))) #s(literal 1 binary64)))) (pow.f64 a1 #s(literal 4 binary64)))
(/ (- (+ (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2)))) (/ (* (pow a2 12) (sqrt 2)) (* (pow a1 12) (+ 1 (* -1/2 (pow th 2)))))) (+ (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))) (* -1 (/ (* (pow a2 8) (sqrt 2)) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2)))))))) (pow a1 4))
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 12 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (pow.f64 a1 #s(literal 12 binary64))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 8 binary64)) (pow.f64 a1 #s(literal 8 binary64))) #s(literal 1 binary64))))) (pow.f64 a1 #s(literal 4 binary64)))
(/ (sqrt 2) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (pow.f64 a1 #s(literal 4 binary64)))
(/ (+ (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2)))) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))) (pow a1 4))
(/.f64 (*.f64 (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (pow.f64 a1 #s(literal 4 binary64)))
(/ (- (+ (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2)))) (/ (* (pow a2 8) (sqrt 2)) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2)))))) (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2))))))) (pow a1 4))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 8 binary64)) (pow.f64 a1 #s(literal 8 binary64))) #s(literal 1 binary64)))) (pow.f64 a1 #s(literal 4 binary64)))
(/ (- (+ (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2)))) (/ (* (pow a2 12) (sqrt 2)) (* (pow a1 12) (+ 1 (* -1/2 (pow th 2)))))) (+ (* -1 (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))) (* -1 (/ (* (pow a2 8) (sqrt 2)) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2)))))))) (pow a1 4))
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 12 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (pow.f64 a1 #s(literal 12 binary64))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 8 binary64)) (pow.f64 a1 #s(literal 8 binary64))) #s(literal 1 binary64))))) (pow.f64 a1 #s(literal 4 binary64)))
(/ (sqrt 2) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2)))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (pow.f64 a1 #s(literal 4 binary64)))
(+ (/ (sqrt 2) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2))))) (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2))))))
(+.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (pow.f64 a1 #s(literal 8 binary64))))
(+ (* (pow a2 4) (- (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 12) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (sqrt 2) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2)))))))) (/ (sqrt 2) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2))))))
(+.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 12 binary64))) (/.f64 #s(literal -1 binary64) (pow.f64 a1 #s(literal 8 binary64)))))))
(+ (* (pow a2 4) (- (* (pow a2 4) (- (/ (* (pow a2 4) (sqrt 2)) (* (pow a1 16) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (sqrt 2) (* (pow a1 12) (+ 1 (* -1/2 (pow th 2)))))))) (* -1 (/ (sqrt 2) (* (pow a1 8) (+ 1 (* -1/2 (pow th 2)))))))) (/ (sqrt 2) (* (pow a1 4) (+ 1 (* -1/2 (pow th 2))))))
(+.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (pow.f64 a1 #s(literal 8 binary64)))) (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 16 binary64))) (/.f64 #s(literal -1 binary64) (pow.f64 a1 #s(literal 12 binary64)))))))))
(* -1 (/ (sqrt 2) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64))))
(/ (+ (* -1 (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))))) (pow a2 4))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (pow.f64 a2 #s(literal 4 binary64)))
(/ (- (+ (* -1 (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (* (pow a1 8) (sqrt 2)) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2))))))) (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))))) (pow a2 4))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 #s(literal -1 binary64) (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 (pow.f64 a1 #s(literal 8 binary64)) (pow.f64 a2 #s(literal 8 binary64)))))) (pow.f64 a2 #s(literal 4 binary64)))
(/ (- (+ (* -1 (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (* (pow a1 12) (sqrt 2)) (* (pow a2 12) (+ 1 (* -1/2 (pow th 2))))))) (+ (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))) (/ (* (pow a1 8) (sqrt 2)) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2))))))) (pow a2 4))
(/.f64 (-.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a1 #s(literal 12 binary64)) (pow.f64 a2 #s(literal 12 binary64))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 (pow.f64 a1 #s(literal 8 binary64)) (pow.f64 a2 #s(literal 8 binary64)))))) (pow.f64 a2 #s(literal 4 binary64)))
(* -1 (/ (sqrt 2) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64))))
(/ (+ (* -1 (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))))) (pow a2 4))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))))) (pow.f64 a2 #s(literal 4 binary64)))
(/ (- (+ (* -1 (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (* (pow a1 8) (sqrt 2)) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2))))))) (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2)))))) (pow a2 4))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 #s(literal -1 binary64) (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 (pow.f64 a1 #s(literal 8 binary64)) (pow.f64 a2 #s(literal 8 binary64)))))) (pow.f64 a2 #s(literal 4 binary64)))
(/ (- (+ (* -1 (/ (sqrt 2) (+ 1 (* -1/2 (pow th 2))))) (* -1 (/ (* (pow a1 12) (sqrt 2)) (* (pow a2 12) (+ 1 (* -1/2 (pow th 2))))))) (+ (/ (* (pow a1 4) (sqrt 2)) (* (pow a2 4) (+ 1 (* -1/2 (pow th 2))))) (/ (* (pow a1 8) (sqrt 2)) (* (pow a2 8) (+ 1 (* -1/2 (pow th 2))))))) (pow a2 4))
(/.f64 (-.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a1 #s(literal 12 binary64)) (pow.f64 a2 #s(literal 12 binary64))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) (/.f64 (pow.f64 a1 #s(literal 8 binary64)) (pow.f64 a2 #s(literal 8 binary64)))))) (pow.f64 a2 #s(literal 4 binary64)))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
(+ (sqrt 2) (* 1/2 (* (pow th 2) (sqrt 2))))
(*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (sqrt 2) (* (pow th 2) (- (* 1/4 (* (pow th 2) (sqrt 2))) (* -1/2 (sqrt 2)))))
(+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 th th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))))
(+ (sqrt 2) (* (pow th 2) (- (* (pow th 2) (- (* 1/8 (* (pow th 2) (sqrt 2))) (* -1/4 (sqrt 2)))) (* -1/2 (sqrt 2)))))
(+.f64 (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 th th) #s(literal 1/8 binary64)) #s(literal 1/4 binary64)))))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(* -2 (/ (sqrt 2) (pow th 2)))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th)
(/ (+ (* -4 (/ (sqrt 2) (pow th 2))) (* -2 (sqrt 2))) (pow th 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) th) #s(literal -4 binary64))) (*.f64 th th))
(/ (- (+ (* -8 (/ (sqrt 2) (pow th 4))) (* -2 (sqrt 2))) (* 4 (/ (sqrt 2) (pow th 2)))) (pow th 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) (+.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) th) #s(literal -4 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -8 binary64)) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 th th))
(/ (- (+ (* -16 (/ (sqrt 2) (pow th 6))) (* -2 (sqrt 2))) (+ (* 4 (/ (sqrt 2) (pow th 2))) (* 8 (/ (sqrt 2) (pow th 4))))) (pow th 2))
(/.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -16 binary64)) (pow.f64 th #s(literal 6 binary64)))) (+.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) th) #s(literal -4 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -8 binary64)) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 th th))
(* -2 (/ (sqrt 2) (pow th 2)))
(/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th)
(/ (+ (* -4 (/ (sqrt 2) (pow th 2))) (* -2 (sqrt 2))) (pow th 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) th) #s(literal -4 binary64))) (*.f64 th th))
(/ (- (+ (* -8 (/ (sqrt 2) (pow th 4))) (* -2 (sqrt 2))) (* 4 (/ (sqrt 2) (pow th 2)))) (pow th 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) (+.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) th) #s(literal -4 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -8 binary64)) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 th th))
(/ (- (+ (* -16 (/ (sqrt 2) (pow th 6))) (* -2 (sqrt 2))) (+ (* 4 (/ (sqrt 2) (pow th 2))) (* 8 (/ (sqrt 2) (pow th 4))))) (pow th 2))
(/.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -16 binary64)) (pow.f64 th #s(literal 6 binary64)))) (+.f64 (*.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) th) #s(literal -4 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -8 binary64)) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 th th))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow th 2)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) th) th))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))))))
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1 (pow a2 4))
(-.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64)))
(- (pow a1 4) (pow a2 4))
(-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))
(- (pow a1 4) (pow a2 4))
(-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))
(- (pow a1 4) (pow a2 4))
(-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))
(pow a1 4)
(pow.f64 a1 #s(literal 4 binary64))
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 4) (pow a1 4)))))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))))
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 4) (pow a1 4)))))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))))
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 4) (pow a1 4)))))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))))
(pow a1 4)
(pow.f64 a1 #s(literal 4 binary64))
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 4) (pow a1 4)))))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))))
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 4) (pow a1 4)))))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))))
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 4) (pow a1 4)))))
(*.f64 (pow.f64 a1 #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))))
(pow a1 4)
(pow.f64 a1 #s(literal 4 binary64))
(+ (* -1 (pow a2 4)) (pow a1 4))
(-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))
(+ (* -1 (pow a2 4)) (pow a1 4))
(-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))
(+ (* -1 (pow a2 4)) (pow a1 4))
(-.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))
(* -1 (pow a2 4))
(-.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64)))
(* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))
(*.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))
(* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))
(*.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))
(* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))
(*.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))
(* -1 (pow a2 4))
(-.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64)))
(* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))
(*.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))
(* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))
(*.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))
(* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))
(*.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 #s(literal -1 binary64) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))))
(* -1 (pow a2 2))
(-.f64 #s(literal 0 binary64) (*.f64 a2 a2))
(- (pow a1 2) (pow a2 2))
(-.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(- (pow a1 2) (pow a2 2))
(-.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(- (pow a1 2) (pow a2 2))
(-.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
(* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
(* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
(* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
(* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
(pow a1 2)
(*.f64 a1 a1)
(+ (* -1 (pow a2 2)) (pow a1 2))
(-.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+ (* -1 (pow a2 2)) (pow a1 2))
(-.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+ (* -1 (pow a2 2)) (pow a1 2))
(-.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* -1 (pow a2 2))
(-.f64 #s(literal 0 binary64) (*.f64 a2 a2))
(* (pow a2 2) (- (/ (pow a1 2) (pow a2 2)) 1))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1 binary64)))
(* (pow a2 2) (- (/ (pow a1 2) (pow a2 2)) 1))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1 binary64)))
(* (pow a2 2) (- (/ (pow a1 2) (pow a2 2)) 1))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1 binary64)))
(* -1 (pow a2 2))
(-.f64 #s(literal 0 binary64) (*.f64 a2 a2))
(* (pow a2 2) (- (/ (pow a1 2) (pow a2 2)) 1))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1 binary64)))
(* (pow a2 2) (- (/ (pow a1 2) (pow a2 2)) 1))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1 binary64)))
(* (pow a2 2) (- (/ (pow a1 2) (pow a2 2)) 1))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1 binary64)))

eval202.0ms (1.8%)

Memory
5.5MiB live, 434.9MiB allocated
Compiler

Compiled 62 484 to 3 764 computations (94% saved)

prune235.0ms (2.1%)

Memory
-0.6MiB live, 490.8MiB allocated
Pruning

40 alts after pruning (34 fresh and 6 done)

PrunedKeptTotal
New1 546221 568
Fresh51217
Picked235
Done134
Total1 554401 594
Accuracy
100.0%
Counts
1 594 → 40
Alt Table
Click to see full alt table
StatusAccuracyProgram
67.3%
(pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) a2) #s(literal 2 binary64))
16.7%
(/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
52.0%
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
1.5%
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
10.2%
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
17.0%
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
67.8%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
17.1%
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 1/2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
15.3%
(/.f64 (*.f64 (*.f64 a2 a2) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))
✓99.6%
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
98.9%
(/.f64 (*.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
59.4%
(/.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (sqrt.f64 #s(literal 2 binary64)))
✓67.4%
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
12.1%
(/.f64 (*.f64 a1 a1) (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th))
13.4%
(/.f64 (*.f64 a1 a1) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))))
11.9%
(/.f64 (*.f64 a1 a1) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
12.2%
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
67.4%
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
14.7%
(/.f64 a1 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) a1))
67.3%
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
67.4%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
67.4%
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal -1 binary64)) a2)
✓99.0%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))
59.4%
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
54.1%
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
✓99.0%
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
11.3%
(*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
67.4%
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a2)))
✓67.4%
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
14.7%
(*.f64 (/.f64 a1 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
59.9%
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
17.1%
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
99.0%
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
11.4%
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2)))))))
✓67.8%
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
41.6%
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
67.4%
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2))
67.4%
(*.f64 (neg.f64 (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))) a2)
99.0%
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2)))
67.4%
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
Compiler

Compiled 1 836 to 707 computations (61.5% saved)

regimes180.0ms (1.6%)

Memory
12.7MiB live, 282.8MiB allocated
Counts
64 → 1
Calls
Call 1
Inputs
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(*.f64 (neg.f64 (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))) a2)
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a2)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 a1 a1) (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th))
(/.f64 (*.f64 (*.f64 a2 a2) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
(/.f64 a1 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) a1))
(/.f64 (*.f64 a1 a1) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(/.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 a2 a2) (+.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 1/2 binary64)) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(/.f64 (*.f64 a1 a1) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a1 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 1/2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2)))))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) a2) #s(literal 2 binary64))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal -1 binary64)) a2)
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 (*.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2) (*.f64 (cos.f64 th) a2))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
Outputs
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
Calls

8 calls:

29.0ms
(*.f64 a1 a1)
28.0ms
a2
25.0ms
th
20.0ms
(cos.f64 th)
19.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
99.6%1a1
99.6%1a2
99.6%1th
99.6%1(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
99.6%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
99.6%1(cos.f64 th)
99.6%1(*.f64 a1 a1)
99.6%1(*.f64 a2 a2)
Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes163.0ms (1.5%)

Memory
1.6MiB live, 239.3MiB allocated
Counts
59 → 1
Calls
Call 1
Inputs
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(*.f64 (neg.f64 (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))) a2)
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a2)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 a1 a1) (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th))
(/.f64 (*.f64 (*.f64 a2 a2) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
(/.f64 a1 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) a1))
(/.f64 (*.f64 a1 a1) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(/.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 a2 a2) (+.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 1/2 binary64)) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(/.f64 (*.f64 a1 a1) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a1 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 1/2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2)))))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) a2) #s(literal 2 binary64))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal -1 binary64)) a2)
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 (*.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2) (*.f64 (cos.f64 th) a2))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
Outputs
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
Calls

7 calls:

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

Compiled 37 to 28 computations (24.3% saved)

regimes182.0ms (1.7%)

Memory
-19.4MiB live, 226.5MiB allocated
Counts
58 → 1
Calls
Call 1
Inputs
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(*.f64 (neg.f64 (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))) a2)
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a2)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 a1 a1) (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th))
(/.f64 (*.f64 (*.f64 a2 a2) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
(/.f64 a1 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) a1))
(/.f64 (*.f64 a1 a1) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(/.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 a2 a2) (+.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 1/2 binary64)) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(/.f64 (*.f64 a1 a1) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a1 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 1/2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2)))))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) a2) #s(literal 2 binary64))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal -1 binary64)) a2)
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 (*.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2) (*.f64 (cos.f64 th) a2))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
Outputs
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
Calls

7 calls:

40.0ms
(*.f64 a2 a2)
40.0ms
(cos.f64 th)
31.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
17.0ms
a2
16.0ms
th
Results
AccuracySegmentsBranch
99.5%1a1
99.5%1a2
99.5%1th
99.5%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
99.5%1(cos.f64 th)
99.5%1(*.f64 a1 a1)
99.5%1(*.f64 a2 a2)
Compiler

Compiled 37 to 28 computations (24.3% saved)

regimes117.0ms (1.1%)

Memory
-1.5MiB live, 233.6MiB allocated
Counts
57 → 1
Calls
Call 1
Inputs
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(*.f64 (neg.f64 (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))) a2)
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a2)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 a1 a1) (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th))
(/.f64 (*.f64 (*.f64 a2 a2) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
(/.f64 a1 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) a1))
(/.f64 (*.f64 a1 a1) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(/.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 a2 a2) (+.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 1/2 binary64)) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(/.f64 (*.f64 a1 a1) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a1 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 1/2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2)))))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) a2) #s(literal 2 binary64))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal -1 binary64)) a2)
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 (*.f64 (cos.f64 th) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2) (*.f64 (cos.f64 th) a2))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
Outputs
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
Calls

7 calls:

18.0ms
a2
17.0ms
(*.f64 a2 a2)
16.0ms
(cos.f64 th)
16.0ms
th
15.0ms
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
Results
AccuracySegmentsBranch
99.0%1a1
99.0%1a2
99.0%1th
99.0%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
99.0%1(cos.f64 th)
99.0%1(*.f64 a1 a1)
99.0%1(*.f64 a2 a2)
Compiler

Compiled 37 to 28 computations (24.3% saved)

regimes85.0ms (0.8%)

Memory
38.3MiB live, 191.8MiB allocated
Counts
46 → 1
Calls
Call 1
Inputs
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(*.f64 (neg.f64 (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))) a2)
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a2)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 a1 a1) (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th))
(/.f64 (*.f64 (*.f64 a2 a2) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
(/.f64 a1 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) a1))
(/.f64 (*.f64 a1 a1) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(/.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 a2 a2) (+.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 1/2 binary64)) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(/.f64 (*.f64 a1 a1) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a1 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 1/2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2)))))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) a2) #s(literal 2 binary64))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal -1 binary64)) a2)
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2)))
Outputs
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2)))
Calls

6 calls:

16.0ms
th
14.0ms
a1
13.0ms
(cos.f64 th)
12.0ms
a2
12.0ms
(*.f64 a1 a1)
Results
AccuracySegmentsBranch
99.0%1a1
99.0%1a2
99.0%1th
99.0%1(cos.f64 th)
99.0%1(*.f64 a1 a1)
99.0%1(*.f64 a2 a2)
Compiler

Compiled 29 to 21 computations (27.6% saved)

regimes109.0ms (1%)

Memory
-22.9MiB live, 151.4MiB allocated
Counts
45 → 2
Calls
Call 1
Inputs
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(*.f64 (neg.f64 (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))) a2)
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a2)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 a1 a1) (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th))
(/.f64 (*.f64 (*.f64 a2 a2) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
(/.f64 a1 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) a1))
(/.f64 (*.f64 a1 a1) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 th th)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(/.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 a2 a2) (+.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 1/2 binary64)) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(/.f64 (*.f64 a1 a1) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a1 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 1/2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 th (*.f64 th (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th (*.f64 th th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2)))))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 #s(literal -1/2 binary64) th)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) a2) #s(literal 2 binary64))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal -1 binary64)) a2)
Outputs
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
Calls

5 calls:

41.0ms
a2
26.0ms
(*.f64 a2 a2)
14.0ms
a1
12.0ms
th
10.0ms
(*.f64 a1 a1)
Results
AccuracySegmentsBranch
67.8%1a2
67.8%1th
67.8%1(*.f64 a2 a2)
69.8%2a1
69.8%2(*.f64 a1 a1)
Compiler

Compiled 24 to 17 computations (29.2% saved)

regimes39.0ms (0.4%)

Memory
-3.7MiB live, 34.4MiB allocated
Counts
18 → 1
Calls
Call 1
Inputs
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(*.f64 (neg.f64 (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))) a2)
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a2)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 a1 a1) (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) th) #s(literal -2 binary64)) th))
(/.f64 (*.f64 (*.f64 a2 a2) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64)))
Outputs
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
Calls

3 calls:

27.0ms
a1
5.0ms
th
5.0ms
(*.f64 a1 a1)
Results
AccuracySegmentsBranch
67.8%1th
67.8%1a1
67.8%1(*.f64 a1 a1)
Compiler

Compiled 14 to 10 computations (28.6% saved)

regimes38.0ms (0.3%)

Memory
4.3MiB live, 41.8MiB allocated
Accuracy

Total -35.5b remaining (-170.2%)

Threshold costs -35.5b (-170.2%)

Counts
11 → 1
Calls
Call 1
Inputs
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2))
(*.f64 (neg.f64 (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))) a2)
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)))
Outputs
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
Calls

5 calls:

22.0ms
a2
4.0ms
th
4.0ms
a1
4.0ms
(*.f64 a2 a2)
3.0ms
(*.f64 a1 a1)
Results
AccuracySegmentsBranch
67.4%1a1
67.4%1(*.f64 a1 a1)
67.4%1a2
67.4%1(*.f64 a2 a2)
67.4%1th
Compiler

Compiled 24 to 17 computations (29.2% saved)

bsearch1.0ms (0%)

Memory
1.8MiB live, 1.8MiB allocated
Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
1.6024539526235524e+223
7.391914079312543e+244
Compiler

Compiled 25 to 18 computations (28% saved)

simplify12.0ms (0.1%)

Memory
-21.5MiB live, 17.3MiB allocated
Algorithm
1×egg-herbie
Rules
24×*-commutative_binary64
4×+-commutative_binary64
2×1-exp_binary64
2×1-exp_binary32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
034103
151103
Stop Event
1×saturated
Calls
Call 1
Inputs
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(if (<=.f64 (*.f64 a1 a1) #s(literal 20000000000000000932036143496413951368101716198987537228419609160373655626461725991455354244283914246420679531919709797306345233320137961827212441949852868811748602547346324437989744117901104766529194715431204855687099187200 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
Outputs
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #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 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2)))
(*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 1/2 binary64))))
(if (<=.f64 (*.f64 a1 a1) #s(literal 20000000000000000932036143496413951368101716198987537228419609160373655626461725991455354244283914246420679531919709797306345233320137961827212441949852868811748602547346324437989744117901104766529194715431204855687099187200 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(if (<=.f64 (*.f64 a1 a1) #s(literal 20000000000000000932036143496413951368101716198987537228419609160373655626461725991455354244283914246420679531919709797306345233320137961827212441949852868811748602547346324437989744117901104766529194715431204855687099187200 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))

soundness1.1s (10.3%)

Memory
43.0MiB live, 900.2MiB allocated
Rules
34 694×accelerator-lowering-fma.f32
34 694×accelerator-lowering-fma.f64
13 734×accelerator-lowering-fma.f32
13 734×accelerator-lowering-fma.f64
13 018×accelerator-lowering-fma.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01703768
15433735
218953584
351923550
082573287
01238
15038
240338
3732138
0842437
03606551
111256214
236155863
083365581
01863249
15813182
221043149
355732977
470702977
080642758
01111498
13431366
212051262
338981233
084221172
Stop Event
1×fuel
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
Compiler

Compiled 353 to 212 computations (39.9% saved)

preprocess152.0ms (1.4%)

Memory
-8.1MiB live, 229.5MiB allocated
Remove

(sort a1 a2)

(abs th)

(abs a2)

(abs a1)

Compiler

Compiled 896 to 532 computations (40.6% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...