Migdal et al, Equation (64)

Time bar (total: 10.5s)

analyze0.0ms (0%)

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 23 to 13 computations (43.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 0.0ms
ival-div: 0.0ms (0% of total)
ival-add: 0.0ms (0% of total)
ival-cos: 0.0ms (0% of total)
ival-mult: 0.0ms (0% of total)
const: 0.0ms (0% of total)
ival-sqrt: 0.0ms (0% of total)
backward-pass: 0.0ms (0% of total)

sample1.4s (13.4%)

Results
1.1s8256×0valid
Precisions
Click to see histograms. Total time spent on operations: 696.0ms
ival-mult: 270.0ms (38.8% of total)
ival-cos: 214.0ms (30.7% of total)
ival-add: 74.0ms (10.6% of total)
ival-sqrt: 63.0ms (9.1% of total)
ival-div: 59.0ms (8.5% of total)
const: 13.0ms (1.9% of total)
backward-pass: 3.0ms (0.4% of total)
Bogosity

preprocess84.0ms (0.8%)

Algorithm
2×egg-herbie
Rules
1362×times-frac
1322×fmsub-define
1238×fnmsub-define
1094×fmm-def
862×sum3-define
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
041113
1142113
2420113
31246110
43474110
57728110
01211
12811
25911
39411
412011
512411
012411
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) (rsqrt 2)) (fma a1 a1 (square a2)))
(+ (* (/ (cos th) (sqrt 2)) (* (neg a1) (neg a1))) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
(* (* (cos th) (rsqrt 2)) (fma a1 a1 (square a2)))
(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* (neg a2) (neg a2))))
(* (* (cos th) (rsqrt 2)) (fma a1 a1 (square a2)))
(+ (* (/ (cos (neg th)) (sqrt 2)) (* a1 a1)) (* (/ (cos (neg th)) (sqrt 2)) (* a2 a2)))
(* (* (cos th) (rsqrt 2)) (fma a1 a1 (square a2)))
(neg (+ (* (/ (cos th) (sqrt 2)) (* (neg a1) (neg a1))) (* (/ (cos th) (sqrt 2)) (* a2 a2))))
(* (* (cos th) (rsqrt 2)) (fnmsub a1 a1 (square a2)))
(neg (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* (neg a2) (neg a2)))))
(* (* (cos th) (rsqrt 2)) (fnmsub a1 a1 (square a2)))
(neg (+ (* (/ (cos (neg th)) (sqrt 2)) (* a1 a1)) (* (/ (cos (neg th)) (sqrt 2)) (* a2 a2))))
(* (* (cos th) (rsqrt 2)) (fnmsub a1 a1 (square a2)))
(+ (* (/ (cos th) (sqrt 2)) (* a2 a2)) (* (/ (cos th) (sqrt 2)) (* a1 a1)))
(* (* (cos th) (rsqrt 2)) (fma a1 a1 (square a2)))
(+ (* (/ (cos a1) (sqrt 2)) (* th th)) (* (/ (cos a1) (sqrt 2)) (* a2 a2)))
(* (* (cos a1) (rsqrt 2)) (+ (square a2) (square th)))
(+ (* (/ (cos a2) (sqrt 2)) (* a1 a1)) (* (/ (cos a2) (sqrt 2)) (* th th)))
(* (cos a2) (/ (fma th th (square a1)) (sqrt 2)))
Symmetry

(abs a1)

(abs a2)

(abs th)

(sort a1 a2)

explain234.0ms (2.2%)

FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
00-0-(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
00-0-a2
00-0-(cos.f64 th)
00-0-(*.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-#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-th
00-0-(sqrt.f64 #s(literal 2 binary64))
00-0-(*.f64 a1 a1)
00-0-a1
Results
156.0ms512×0valid
Compiler

Compiled 142 to 38 computations (73.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 40.0ms
ival-mult: 13.0ms (32.4% of total)
ival-cos: 12.0ms (30% of total)
ival-div: 7.0ms (17.5% of total)
ival-sqrt: 4.0ms (10% of total)
ival-add: 2.0ms (5% of total)
const: 1.0ms (2.5% of total)
backward-pass: 0.0ms (0% of total)

eval0.0ms (0%)

Compiler

Compiled 16 to 11 computations (31.3% saved)

prune1.0ms (0%)

Alt Table
Click to see full alt table
StatusAccuracyProgram
▶99.6%
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
▶99.6%
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
Compiler

Compiled 38 to 23 computations (39.5% saved)

simplify9.0ms (0.1%)

Algorithm
1×egg-herbie
Localize:

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

Useful iterations: 0 (0.0ms)

IterNodesCost
01580
13580
26880
310280
412180
512580
012580
Stop Event
1×iter limit
1×saturated
Calls
Call 1
Inputs
(* (cos th) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)))
(cos th)
th
(/ (+ (* a1 a1) (* a2 a2)) (sqrt 2))
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
a1
(* a2 a2)
a2
(sqrt 2)
2
(+ (* (/ (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) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(cos th)
(cos.f64 th)
th
(/ (+ (* 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) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
(/.f64 (*.f64 (cos.f64 th) (+.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 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(* a2 a2)
(*.f64 a2 a2)
a2

localize322.0ms (3.1%)

Localize:

Found 8 expressions of interest:

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

Compiled 104 to 16 computations (84.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 23.0ms
ival-mult: 9.0ms (38.7% of total)
ival-cos: 6.0ms (25.8% of total)
ival-div: 3.0ms (12.9% of total)
ival-add: 2.0ms (8.6% of total)
ival-sqrt: 2.0ms (8.6% of total)
const: 1.0ms (4.3% of total)
backward-pass: 0.0ms (0% of total)

series67.0ms (0.6%)

Counts
9 → 192
Calls
Call 1
Inputs
#<alt (* (cos th) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)))>
#<alt (cos th)>
#<alt (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2))>
#<alt (+ (* a1 a1) (* a2 a2))>
#<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 (sqrt 2)>
#<alt (* (/ (cos th) (sqrt 2)) (* a2 a2))>
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 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 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 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) (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 (/ (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

48 calls:

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

rewrite356.0ms (3.4%)

Algorithm
1×batch-egg-rewrite
Rules
5134×*-lowering-*.f32
5134×*-lowering-*.f64
2130×/-lowering-/.f32
2130×/-lowering-/.f64
1402×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01560
17760
271060
0874760
Stop Event
1×iter limit
1×node limit
Counts
9 → 542
Calls
Call 1
Inputs
(* (cos th) (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2)))
(cos th)
(/ (+ (* a1 a1) (* a2 a2)) (sqrt 2))
(+ (* a1 a1) (* a2 a2))
(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
(* (/ (cos th) (sqrt 2)) (* a1 a1))
(/ (cos th) (sqrt 2))
(sqrt 2)
(* (/ (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 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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)))) (neg.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #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 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #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 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #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 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 a1)) (/.f64 (*.f64 a2 a2) (/.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 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 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 (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 (*.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 (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))))
(neg.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (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 (cos.f64 th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 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 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(neg.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (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 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (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) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.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 #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 (/.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 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.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 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (+.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 (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 #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))) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) #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 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #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 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(/.f64 #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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (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 (-.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) (cos.f64 th)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #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 (/.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 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.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 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 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 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 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 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 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 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 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (+.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)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.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 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 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 (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 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 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.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 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.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 a2 (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 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 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 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 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 (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))) (/.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))) (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 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 (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 #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 (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)) (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 (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))) (/.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 (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 (*.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 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) #s(literal 2 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 (neg.f64 (+.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))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (-.f64 #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 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))) (sqrt.f64 #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 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (neg.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (cos.f64 th) (sqrt.f64 #s(literal 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 #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 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 (pow.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #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)))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (*.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #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 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #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 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #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 (-.f64 (*.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #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 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #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 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #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))))))
(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 (cos.f64 th) (+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2))))
(*.f64 (cos.f64 th) (+.f64 (*.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)))))
(*.f64 (cos.f64 th) (+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 a1))))
(*.f64 (cos.f64 th) (+.f64 (*.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)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (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 (+.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 #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 #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 #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 (/.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 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.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 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.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 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 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 #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 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (*.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 (sqrt.f64 #s(literal 2 binary64)) (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))) (/.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 (*.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)))) #s(literal 1/2 binary64))
(*.f64 (+.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (*.f64 (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 #s(literal 1 binary64) (*.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 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #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 (-.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 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 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 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 #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 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (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 (*.f64 a1 a1) (*.f64 a2 a2)) (/.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)) (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) (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 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 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 #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 (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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 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 (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 (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)))
(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)))
(+.f64 (*.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)) (*.f64 a1 a1)))
(+.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 a1)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(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 (/.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 #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 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)))))
(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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 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)))) (sqrt.f64 #s(literal 2 binary64))))
(/.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 (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 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (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 #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)))) (sqrt.f64 #s(literal 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 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.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 #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 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(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 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(/.f64 (-.f64 #s(literal 0 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 #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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (+.f64 (*.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 #s(literal 0 binary64) (-.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 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 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 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(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))))
(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 (*.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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (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 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 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 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 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 #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 #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 #s(literal 1 binary64) (*.f64 (-.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 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal -1/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)))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)) (/.f64 #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 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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 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 (*.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 (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 (pow.f64 #s(literal 2 binary64) #s(literal -1/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 #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 #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 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(+.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 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 a2 a2 (*.f64 a1 a1))
(neg.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(/.f64 (+.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (+.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (-.f64 #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 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #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 #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 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.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 (*.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 (*.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 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 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 #s(literal 0 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 (*.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 (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 (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)))))
(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 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (+.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 #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 #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 #s(literal -1 binary64) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(*.f64 (-.f64 #s(literal 0 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 #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 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 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 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 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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)))) (neg.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #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 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #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 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #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 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 a1)) (/.f64 (*.f64 a2 a2) (/.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 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 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 (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 (*.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 (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))))
(neg.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (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 (cos.f64 th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 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 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(neg.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (/.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (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 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (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) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.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 #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 (/.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 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.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 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (+.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 (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 #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))) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) #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 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #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 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(/.f64 #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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (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 (-.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) (cos.f64 th)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #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 (/.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 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.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 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 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 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 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 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 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 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 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (+.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)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.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 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 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 (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 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 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.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 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.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 a2 (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 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 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 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 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 (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))) (/.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))) (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 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 (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 #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 (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)) (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 (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))) (/.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 (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 (*.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 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) #s(literal 2 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 (neg.f64 (+.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))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (-.f64 #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 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))) (sqrt.f64 #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 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (neg.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (cos.f64 th) (sqrt.f64 #s(literal 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 #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 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 (pow.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #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)))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (*.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #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 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #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 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #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 (-.f64 (*.f64 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #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 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #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 (/.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #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))))))
(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 (cos.f64 th) (+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2))))
(*.f64 (cos.f64 th) (+.f64 (*.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)))))
(*.f64 (cos.f64 th) (+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 a1))))
(*.f64 (cos.f64 th) (+.f64 (*.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)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (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 (+.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 #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 #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 #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 (/.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 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.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 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.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 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 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 #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 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (*.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 (sqrt.f64 #s(literal 2 binary64)) (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))) (/.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 (*.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)))) #s(literal 1/2 binary64))
(*.f64 (+.f64 (*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (*.f64 (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 #s(literal 1 binary64) (*.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 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #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 (-.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 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 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 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 #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 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 (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 (*.f64 a1 a1) (*.f64 a2 a2)) (/.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)) (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) (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 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 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 #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 (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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 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 (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 (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)))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (/.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 #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)) (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 (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) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))) (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 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 a1)))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(*.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 #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 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 th) a1) (*.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.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 (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 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.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 a1 (cos.f64 th)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a1))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/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 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(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 #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 (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)))
(*.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))))
(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 (-.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)))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.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 #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)) (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 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.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 (neg.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (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 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (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) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.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 #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 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.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 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.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 a2 (cos.f64 th)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))

simplify339.0ms (3.2%)

Algorithm
1×egg-herbie
Rules
4346×*-lowering-*.f32
4346×*-lowering-*.f64
3704×+-lowering-+.f64
3704×+-lowering-+.f32
1906×times-frac
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
01432136
15061796
219861700
347641676
089351676
Stop Event
1×iter limit
1×node limit
Counts
192 → 192
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)))))
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 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 a2 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(+ (* -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))
(/ (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) (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 #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))))
(+ (* (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)) (+.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 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 th th) (*.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))))) (*.f64 (+.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)))))
(/ (* (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 (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)) (/ (* (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 (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)) (/ (* (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 (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 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
#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 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th 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 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 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) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.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 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (+.f64 (*.f64 a1 a1) (*.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) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 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 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 th th) (*.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))))) (*.f64 (+.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)))))
(+ (/ (* (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)) (/ (* (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)) (/ (* (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 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 (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)) (/ (* (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 (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)) (/ (* (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 (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 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) (sqrt 2))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(*.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))))
(+ (* (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 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.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 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 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))) (*.f64 (*.f64 th th) (*.f64 th th))) (*.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)))))
(/ (* (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) (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) (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 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 th th) (*.f64 (*.f64 (*.f64 a2 a2) (/.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 (/.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)) (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)))

eval90.0ms (0.9%)

Compiler

Compiled 22084 to 1347 computations (93.9% saved)

prune90.0ms (0.9%)

Pruning

13 alts after pruning (13 fresh and 0 done)

PrunedKeptTotal
New81713830
Fresh000
Picked202
Done000
Total81913832
Accuracy
100.0%
Counts
832 → 13
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶99.6%
(/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
▶99.6%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
▶68.9%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
▶99.7%
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
▶99.2%
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
99.6%
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
99.5%
(*.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.4%
(*.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))))
99.6%
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
60.1%
(*.f64 (+.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))))
99.2%
(*.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
99.6%
(*.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
Compiler

Compiled 428 to 300 computations (29.9% saved)

simplify13.0ms (0.1%)

Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
✓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-diff128
(/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
✓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
(cos.f64 th)
✓cost-diff0
(*.f64 a2 (cos.f64 th))
✓cost-diff0
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
✓cost-diff0
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
✓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)) (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
128×*-lowering-*.f32
128×*-lowering-*.f64
88×/-lowering-/.f32
88×/-lowering-/.f64
86×fma-define
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
021155
146155
280155
3136155
4205155
5246155
6257155
7258155
0258155
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
(/ (+ (* a1 a1) (* a2 a2)) (sqrt 2))
(+ (* 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 (cos th))
(cos th)
th
(sqrt 2)
2
(/ (+ (* 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
(/ (/ (cos th) (sqrt 2)) (/ 1 (+ (* a1 a1) (* a2 a2))))
(/ (cos th) (sqrt 2))
(cos th)
th
(sqrt 2)
2
(/ 1 (+ (* a1 a1) (* a2 a2)))
1
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
a1
(* a2 a2)
a2
Outputs
(/ (* (cos th) (+ (* a1 a1) (* a2 a2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (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)
(/ (+ (* 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)
(/ (* 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 (cos th))
(*.f64 (cos.f64 th) a2)
(cos th)
(cos.f64 th)
th
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th)))
(/.f64 (*.f64 (cos.f64 th) (+.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) (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
(/ (/ (cos th) (sqrt 2)) (/ 1 (+ (* a1 a1) (* a2 a2))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (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)
(/ 1 (+ (* a1 a1) (* a2 a2)))
(/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
1
#s(literal 1 binary64)
(+ (* a1 a1) (* a2 a2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* a1 a1)
(*.f64 a1 a1)
a1
(* a2 a2)
(*.f64 a2 a2)
a2

localize198.0ms (1.9%)

Localize:

Found 20 expressions of interest:

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

Compiled 192 to 22 computations (88.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 47.0ms
ival-mult: 25.0ms (53.1% of total)
ival-div: 11.0ms (23.4% of total)
ival-cos: 6.0ms (12.7% of total)
ival-sqrt: 2.0ms (4.2% of total)
ival-add: 1.0ms (2.1% of total)
const: 1.0ms (2.1% of total)
backward-pass: 0.0ms (0% of total)

series17.0ms (0.2%)

Counts
16 → 348
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 (/ (+ (* a1 a1) (* a2 a2)) (sqrt 2))>
#<alt (* a1 a1)>
#<alt (* a2 a2)>
#<alt (/ (* a2 (* a2 (cos th))) (sqrt 2))>
#<alt (* a2 (* a2 (cos th)))>
#<alt (* a2 (cos th))>
#<alt (/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th)))>
#<alt (/ (/ (cos th) (sqrt 2)) (/ 1 (+ (* a1 a1) (* a2 a2))))>
#<alt (/ (cos th) (sqrt 2))>
#<alt (sqrt 2)>
#<alt (/ (sqrt 2) (cos th))>
#<alt (/ 1 (+ (* a1 a1) (* a2 a2)))>
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) (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)>
#<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) (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 (* 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) (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 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 (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))>
#<alt (/ 1 (pow a2 2))>
#<alt (+ (* -1 (/ (pow a1 2) (pow a2 4))) (/ 1 (pow a2 2)))>
#<alt (+ (* (pow a1 2) (- (/ (pow a1 2) (pow a2 6)) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))>
#<alt (+ (* (pow a1 2) (- (* (pow a1 2) (+ (* -1 (/ (pow a1 2) (pow a2 8))) (/ 1 (pow a2 6)))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))>
#<alt (/ 1 (pow a1 2))>
#<alt (/ (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))) (pow a1 2))>
#<alt (/ (- (+ 1 (/ (pow a2 4) (pow a1 4))) (/ (pow a2 2) (pow a1 2))) (pow a1 2))>
#<alt (/ (- (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))) (+ (* -1 (/ (pow a2 4) (pow a1 4))) (/ (pow a2 2) (pow a1 2)))) (pow a1 2))>
#<alt (/ 1 (pow a1 2))>
#<alt (/ (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))) (pow a1 2))>
#<alt (/ (- (+ 1 (/ (pow a2 4) (pow a1 4))) (/ (pow a2 2) (pow a1 2))) (pow a1 2))>
#<alt (/ (- (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))) (+ (* -1 (/ (pow a2 4) (pow a1 4))) (/ (pow a2 2) (pow a1 2)))) (pow a1 2))>
#<alt (/ 1 (pow a1 2))>
#<alt (+ (* -1 (/ (pow a2 2) (pow a1 4))) (/ 1 (pow a1 2)))>
#<alt (+ (* (pow a2 2) (- (/ (pow a2 2) (pow a1 6)) (/ 1 (pow a1 4)))) (/ 1 (pow a1 2)))>
#<alt (+ (* (pow a2 2) (- (* (pow a2 2) (+ (* -1 (/ (pow a2 2) (pow a1 8))) (/ 1 (pow a1 6)))) (/ 1 (pow a1 4)))) (/ 1 (pow a1 2)))>
#<alt (/ 1 (pow a2 2))>
#<alt (/ (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))) (pow a2 2))>
#<alt (/ (- (+ 1 (/ (pow a1 4) (pow a2 4))) (/ (pow a1 2) (pow a2 2))) (pow a2 2))>
#<alt (/ (- (+ 1 (* -1 (/ (pow a1 6) (pow a2 6)))) (+ (* -1 (/ (pow a1 4) (pow a2 4))) (/ (pow a1 2) (pow a2 2)))) (pow a2 2))>
#<alt (/ 1 (pow a2 2))>
#<alt (/ (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))) (pow a2 2))>
#<alt (/ (- (+ 1 (/ (pow a1 4) (pow a2 4))) (/ (pow a1 2) (pow a2 2))) (pow a2 2))>
#<alt (/ (- (+ 1 (* -1 (/ (pow a1 6) (pow a2 6)))) (+ (* -1 (/ (pow a1 4) (pow a2 4))) (/ (pow a1 2) (pow a2 2)))) (pow a2 2))>
Calls

87 calls:

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

rewrite419.0ms (4%)

Algorithm
1×batch-egg-rewrite
Rules
4408×*-lowering-*.f32
4408×*-lowering-*.f64
3304×/-lowering-/.f32
3304×/-lowering-/.f64
1688×frac-times
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02195
110795
272195
3799095
0808195
Stop Event
1×iter limit
1×node limit
Counts
16 → 1514
Calls
Call 1
Inputs
(/ (* (cos th) (+ (* a1 a1) (* a2 a2))) (sqrt 2))
(* (cos th) (+ (* a1 a1) (* a2 a2)))
(cos th)
(+ (* a1 a1) (* a2 a2))
(/ (+ (* a1 a1) (* a2 a2)) (sqrt 2))
(* a1 a1)
(* a2 a2)
(/ (* a2 (* a2 (cos th))) (sqrt 2))
(* a2 (* a2 (cos th)))
(* a2 (cos th))
(/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th)))
(/ (/ (cos th) (sqrt 2)) (/ 1 (+ (* a1 a1) (* a2 a2))))
(/ (cos th) (sqrt 2))
(sqrt 2)
(/ (sqrt 2) (cos th))
(/ 1 (+ (* a1 a1) (* a2 a2)))
Outputs
(+.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 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(+.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 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(+.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.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 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (/.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))))
(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 #s(literal 0 binary64) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(-.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (/.f64 a2 (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 (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 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 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(-.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))))))
(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 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 (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 (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) (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 #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 (*.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 (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 (/.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))))
(neg.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.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) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (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 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 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 #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 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.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 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.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 (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 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 a1) (*.f64 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 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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))) (cos.f64 th)))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 (*.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 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (cos.f64 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 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 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 a1) (*.f64 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 0 binary64) (cos.f64 th))) (+.f64 (*.f64 a2 (*.f64 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 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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) (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 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 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 a1) (*.f64 (*.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 (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 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 a1 a1) (*.f64 (*.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 (*.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 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64))
(/.f64 (neg.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 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 #s(literal 1 binary64) (cos.f64 th)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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) (cos.f64 th))))
(/.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 (*.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 a1) (*.f64 a2 a2)) #s(literal -1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.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 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 th)) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #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 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a2 a2) (*.f64 a1 a1))) (cos.f64 th)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal 1 binary64)))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal -1 binary64)))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64))) #s(literal -1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 (*.f64 a1 a1) (*.f64 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 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 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 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.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 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 #s(literal -1 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 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 0 binary64) (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)) #s(literal -1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 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 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal -1 binary64)))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (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 (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (*.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 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (neg.f64 (neg.f64 (*.f64 (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 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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(/.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.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 (pow.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (/.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 (*.f64 a1 a1) (/.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 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 (pow.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a1 a1) (/.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 a2 a2) (/.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 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 (/.f64 (*.f64 a2 a2) (/.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 a1 a1) (/.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 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 (*.f64 a1 a1) (/.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 a2 a2) (/.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 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 #s(literal 1 binary64) (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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 (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 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64))
(*.f64 (/.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 (*.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 #s(literal 1 binary64) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (-.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 (cos.f64 th) (-.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 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (/.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 0 binary64) (cos.f64 th)) (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (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 #s(literal 0 binary64) (cos.f64 th)) (/.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 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.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 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 (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) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 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) (cos.f64 th))))
(*.f64 (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 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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)) (-.f64 (*.f64 a1 a1) (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.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) (cos.f64 th))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal 1 binary64)))
(*.f64 (neg.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) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (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 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 th)) #s(literal -1 binary64)) (/.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 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (/.f64 (cos.f64 th) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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)) (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (cos.f64 th) #s(literal -1 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 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 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 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 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal 1 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 #s(literal 0 binary64) (cos.f64 th)) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal -1 binary64) (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) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal 1 binary64)))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 (*.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 a1 a2)) (-.f64 a1 a2)) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 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 (cos.f64 th) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 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 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.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 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a1 a2)) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 a1 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))) (/.f64 #s(literal 1 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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.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 (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.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 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 (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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (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 (*.f64 a2 a2) (cos.f64 th) (*.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) a1) a1 (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(neg.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 a1 a1)) #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 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (cos.f64 th)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64))) #s(literal 1 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 (cos.f64 th) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (/.f64 (cos.f64 th) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(/.f64 (/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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 #s(literal 1 binary64) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (-.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) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (cos.f64 th)))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (cos.f64 th)))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 a1 a2)) (/.f64 (cos.f64 th) (-.f64 a1 a2)))
(*.f64 (/.f64 (cos.f64 th) (+.f64 a1 a2)) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 a1 a2)))
(*.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.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 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 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 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (*.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 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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)))))
(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) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal -1 binary64))
(*.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 (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (*.f64 #s(literal 1 binary64) (*.f64 a1 a1)))
(+.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(+.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(+.f64 (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (*.f64 (*.f64 a1 a1) #s(literal 1 binary64)))
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) #s(literal -1 binary64)))
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal -1 binary64) (log.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(exp.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (log.f64 (+.f64 (*.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 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 a2 a2 (*.f64 a1 a1))
(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 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 (+.f64 (*.f64 a1 a1) (*.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 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (+.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 a1 a1) (*.f64 a2 a2)) (-.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 a1) (*.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 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 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 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.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)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.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 (*.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 a1) (*.f64 (*.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 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.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 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.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 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (neg.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.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 a1 a1) (*.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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.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 a1) (*.f64 (*.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 a1 a2)) (-.f64 a1 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64))
(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 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2))))
(*.f64 #s(literal 1 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 #s(literal -1 binary64) (pow.f64 (-.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))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 1 binary64)))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.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 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) #s(literal 1 binary64)))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) #s(literal 1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))
(*.f64 (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 a1 a2)) (+.f64 a1 a2))
(*.f64 (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1/2 binary64)) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (*.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 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.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 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 a1)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)))
(+.f64 (*.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)) (*.f64 a1 a1)))
(+.f64 (*.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(+.f64 (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal -1/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) (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.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 (*.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)))))
(neg.f64 (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.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 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 #s(literal 0 binary64) (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))) #s(literal 1 binary64))
(/.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.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 (*.f64 a1 a1) (*.f64 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 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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)) (-.f64 (*.f64 a1 a1) (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 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 a1) (*.f64 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 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (*.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))) (-.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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (/.f64 #s(literal -1 binary64) (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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 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 a1) (*.f64 (*.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)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.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 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64))
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a2 a2) (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 0 binary64) (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)) #s(literal -1 binary64)) (/.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 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (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 (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (-.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)) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(/.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal -1 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 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.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 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(literal -1 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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 a1 a2)) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 a1 a2)))
(*.f64 (/.f64 #s(literal 1 binary64) (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 #s(literal -1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (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)) (-.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))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.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 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.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 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (*.f64 (*.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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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)))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a1)))
(pow.f64 a1 #s(literal 2 binary64))
(pow.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 a1)) #s(literal 2 binary64))
(*.f64 a1 a1)
(*.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a2)))
(pow.f64 a2 #s(literal 2 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 a2)) #s(literal 2 binary64))
(*.f64 a2 a2)
(*.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)))
(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 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (/.f64 a2 (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 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (/.f64 a2 (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 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (/.f64 a2 (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 a2 a2)))))
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) 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 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.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 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) 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 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 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) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2)) #s(literal -1 binary64))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 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 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/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 #s(literal 1 binary64) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) a2)))
(/.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 a2 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) a2)))
(/.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 (*.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 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)))
(*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (cos.f64 th) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) 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 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (cos.f64 th) a2) (*.f64 (-.f64 #s(literal 0 binary64) a2) (/.f64 #s(literal -1 binary64) (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 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 1 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 a2 a2)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (/.f64 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 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 (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) (*.f64 (cos.f64 th) a2)) a2) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2)
(*.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 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) (*.f64 (cos.f64 th) a2)) (*.f64 a2 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (/.f64 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 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) a2))
(*.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 (*.f64 (cos.f64 th) a2) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) a2) (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 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 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 (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 #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 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) #s(literal -1 binary64)) (/.f64 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))) (/.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 (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 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)) (cos.f64 th))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (cos.f64 th))
(*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 a2 a2) (/.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 #s(literal 1 binary64) (*.f64 (cos.f64 th) a2)) (/.f64 a2 (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 -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (cos.f64 th))
(-.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) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))
(*.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) a2) a2)
(*.f64 (*.f64 (cos.f64 th) a2) (neg.f64 (-.f64 #s(literal 0 binary64) a2)))
(*.f64 (*.f64 (cos.f64 th) a2) (*.f64 a2 #s(literal 1 binary64)))
(*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(*.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 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (-.f64 #s(literal 0 binary64) a2))
(*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2))) 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))
(*.f64 (cos.f64 th) a2)
(*.f64 a2 (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 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(+.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 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(+.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.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 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (/.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))))
(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 #s(literal 0 binary64) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(-.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (/.f64 a2 (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 (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 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 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(-.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))))))
(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 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 (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 (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) (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 #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 (*.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 (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 (/.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))))
(neg.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.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) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (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 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 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 #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 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.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 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.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 (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 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 a1) (*.f64 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 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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))) (cos.f64 th)))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 (*.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 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (cos.f64 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 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 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 a1) (*.f64 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 0 binary64) (cos.f64 th))) (+.f64 (*.f64 a2 (*.f64 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 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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) (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 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 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 a1) (*.f64 (*.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 (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 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 a1 a1) (*.f64 (*.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 (*.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 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64))
(/.f64 (neg.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 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 #s(literal 1 binary64) (cos.f64 th)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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) (cos.f64 th))))
(/.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 (*.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 a1) (*.f64 a2 a2)) #s(literal -1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.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 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 th)) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #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 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a2 a2) (*.f64 a1 a1))) (cos.f64 th)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal 1 binary64)))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal -1 binary64)))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64))) #s(literal -1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 (*.f64 a1 a1) (*.f64 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 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 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 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.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 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 #s(literal -1 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 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 0 binary64) (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)) #s(literal -1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 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 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal -1 binary64)))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (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 (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (*.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 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (neg.f64 (neg.f64 (*.f64 (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 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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(/.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.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 (pow.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (/.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 (*.f64 a1 a1) (/.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 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 (pow.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a1 a1) (/.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 a2 a2) (/.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 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 (/.f64 (*.f64 a2 a2) (/.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 a1 a1) (/.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 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 (*.f64 a1 a1) (/.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 a2 a2) (/.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 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 #s(literal 1 binary64) (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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 (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 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64))
(*.f64 (/.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 (*.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 #s(literal 1 binary64) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (-.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 (cos.f64 th) (-.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 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (/.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 0 binary64) (cos.f64 th)) (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (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 #s(literal 0 binary64) (cos.f64 th)) (/.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 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.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 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 (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) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 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) (cos.f64 th))))
(*.f64 (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 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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)) (-.f64 (*.f64 a1 a1) (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.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) (cos.f64 th))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal 1 binary64)))
(*.f64 (neg.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) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (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 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 th)) #s(literal -1 binary64)) (/.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 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (/.f64 (cos.f64 th) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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)) (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (cos.f64 th) #s(literal -1 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 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 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 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 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal 1 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 #s(literal 0 binary64) (cos.f64 th)) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal -1 binary64) (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) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal 1 binary64)))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 (*.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 a1 a2)) (-.f64 a1 a2)) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 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 (cos.f64 th) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 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 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.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 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a1 a2)) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 a1 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))) (/.f64 #s(literal 1 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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.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 (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.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 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 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 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(+.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 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(+.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.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 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (/.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))))
(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 #s(literal 0 binary64) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(-.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (/.f64 a2 (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 (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 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 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(-.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))))))
(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 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 (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 (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) (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 #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 (*.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 (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 (/.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))))
(neg.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.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) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (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 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 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 #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 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.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 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.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 (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 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 a1) (*.f64 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 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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))) (cos.f64 th)))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 (*.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 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (cos.f64 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 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 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))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 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 a1) (*.f64 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 0 binary64) (cos.f64 th))) (+.f64 (*.f64 a2 (*.f64 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 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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) (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 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 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 a1) (*.f64 (*.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 (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 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 a1 a1) (*.f64 (*.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 (*.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 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64))
(/.f64 (neg.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 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 #s(literal 1 binary64) (cos.f64 th)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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) (cos.f64 th))))
(/.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 (*.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 a1) (*.f64 a2 a2)) #s(literal -1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.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 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 th)) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #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 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a2 a2) (*.f64 a1 a1))) (cos.f64 th)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal 1 binary64)))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal -1 binary64)))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64))) #s(literal -1 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 (*.f64 a1 a1) (*.f64 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 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 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 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.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 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 #s(literal -1 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 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 0 binary64) (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)) #s(literal -1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 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 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal -1 binary64)))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (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 (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.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 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (*.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 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (neg.f64 (neg.f64 (*.f64 (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 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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(/.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.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 (pow.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (/.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 (*.f64 a1 a1) (/.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 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 (pow.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a1 a1) (/.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 a2 a2) (/.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 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 (/.f64 (*.f64 a2 a2) (/.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 a1 a1) (/.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 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 (*.f64 a1 a1) (/.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 a2 a2) (/.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 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 #s(literal 1 binary64) (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)))) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #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 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.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 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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 (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 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64))
(*.f64 (/.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 (*.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 #s(literal 1 binary64) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 #s(literal -1 binary64) (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (-.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 (cos.f64 th) (-.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 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (/.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 0 binary64) (cos.f64 th)) (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (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 #s(literal 0 binary64) (cos.f64 th)) (/.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 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.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 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 (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) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 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) (cos.f64 th))))
(*.f64 (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 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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)) (-.f64 (*.f64 a1 a1) (*.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(*.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.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) (cos.f64 th))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal 1 binary64)))
(*.f64 (neg.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) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (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 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 th)) #s(literal -1 binary64)) (/.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 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))
(*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (/.f64 (cos.f64 th) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.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)) (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (cos.f64 th) #s(literal -1 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 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 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 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 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal 1 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 #s(literal 0 binary64) (cos.f64 th)) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal -1 binary64) (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) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal 1 binary64)))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 (*.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 a1 a2)) (-.f64 a1 a2)) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (cos.f64 th))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 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 (cos.f64 th) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 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 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.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 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a1 a2)) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 a1 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))) (/.f64 #s(literal 1 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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.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 (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.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 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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)))))
(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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 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 0 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(/.f64 (/.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)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 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))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -1 binary64))
(pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(*.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (cos.f64 th) (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 #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 #s(literal 0 binary64) (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 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 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 (-.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 (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 (/.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 (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)) (-.f64 #s(literal 0 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))
(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 #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))
(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 #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)))
(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))))
(/.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 #s(literal 1 binary64) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 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 1 binary64) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal -1/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 1 binary64) (cos.f64 th)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 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 0 binary64) (cos.f64 th)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))
(pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #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 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 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 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 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 (/.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 (/.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 (/.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))))
(*.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 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(+.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))
(+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(exp.f64 (*.f64 #s(literal -1 binary64) (log.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(-.f64 #s(literal 0 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 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 a2 (*.f64 (*.f64 a1 a1) a2)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))
(-.f64 (/.f64 (*.f64 a1 a1) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (*.f64 a2 a2) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(neg.f64 (/.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 #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 -1 binary64) (+.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 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.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 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 (+.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 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.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 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 (+.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 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.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 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.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 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64))
(pow.f64 (exp.f64 (log.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 #s(literal 1 binary64) (+.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 #s(literal -1 binary64) (+.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 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (/.f64 (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (+.f64 a1 a2) (/.f64 (-.f64 a1 a2) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) #s(literal -1 binary64)))
(*.f64 (/.f64 (+.f64 a1 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (-.f64 a1 a2) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (*.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64))) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 a1 a2)) (-.f64 a1 a2))
(*.f64 (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 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 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.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)) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.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)))))

simplify352.0ms (3.3%)

Algorithm
1×egg-herbie
Rules
4294×*-lowering-*.f32
4294×*-lowering-*.f64
3690×+-lowering-+.f64
3690×+-lowering-+.f32
1554×/-lowering-/.f32
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
02574328
18453450
231153234
082133234
Stop Event
1×iter limit
1×node limit
Counts
348 → 348
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) (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)
(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) (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))
(* 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) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (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 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))
(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))
(/ 1 (pow a2 2))
(+ (* -1 (/ (pow a1 2) (pow a2 4))) (/ 1 (pow a2 2)))
(+ (* (pow a1 2) (- (/ (pow a1 2) (pow a2 6)) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))
(+ (* (pow a1 2) (- (* (pow a1 2) (+ (* -1 (/ (pow a1 2) (pow a2 8))) (/ 1 (pow a2 6)))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))
(/ 1 (pow a1 2))
(/ (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))) (pow a1 2))
(/ (- (+ 1 (/ (pow a2 4) (pow a1 4))) (/ (pow a2 2) (pow a1 2))) (pow a1 2))
(/ (- (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))) (+ (* -1 (/ (pow a2 4) (pow a1 4))) (/ (pow a2 2) (pow a1 2)))) (pow a1 2))
(/ 1 (pow a1 2))
(/ (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))) (pow a1 2))
(/ (- (+ 1 (/ (pow a2 4) (pow a1 4))) (/ (pow a2 2) (pow a1 2))) (pow a1 2))
(/ (- (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))) (+ (* -1 (/ (pow a2 4) (pow a1 4))) (/ (pow a2 2) (pow a1 2)))) (pow a1 2))
(/ 1 (pow a1 2))
(+ (* -1 (/ (pow a2 2) (pow a1 4))) (/ 1 (pow a1 2)))
(+ (* (pow a2 2) (- (/ (pow a2 2) (pow a1 6)) (/ 1 (pow a1 4)))) (/ 1 (pow a1 2)))
(+ (* (pow a2 2) (- (* (pow a2 2) (+ (* -1 (/ (pow a2 2) (pow a1 8))) (/ 1 (pow a1 6)))) (/ 1 (pow a1 4)))) (/ 1 (pow a1 2)))
(/ 1 (pow a2 2))
(/ (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))) (pow a2 2))
(/ (- (+ 1 (/ (pow a1 4) (pow a2 4))) (/ (pow a1 2) (pow a2 2))) (pow a2 2))
(/ (- (+ 1 (* -1 (/ (pow a1 6) (pow a2 6)))) (+ (* -1 (/ (pow a1 4) (pow a2 4))) (/ (pow a1 2) (pow a2 2)))) (pow a2 2))
(/ 1 (pow a2 2))
(/ (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))) (pow a2 2))
(/ (- (+ 1 (/ (pow a1 4) (pow a2 4))) (/ (pow a1 2) (pow a2 2))) (pow a2 2))
(/ (- (+ 1 (* -1 (/ (pow a1 6) (pow a2 6)))) (+ (* -1 (/ (pow a1 4) (pow a2 4))) (/ (pow a1 2) (pow a2 2)))) (pow a2 2))
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 #s(literal 1 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 -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 #s(literal 1 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 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 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.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 (cos.f64 th)) (/.f64 a2 (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 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.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 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (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 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 (*.f64 th th) (*.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 th th) (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th th)) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(* (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 a1 a1) (+.f64 (cos.f64 th) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.f64 a1 a1))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (cos.f64 th) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.f64 a1 a1))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (cos.f64 th) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.f64 a1 a1))))
(* (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 a1 a1) (+.f64 (cos.f64 th) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.f64 a1 a1))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (cos.f64 th) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.f64 a1 a1))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (cos.f64 th) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (*.f64 a1 a1))))
(* (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 a2 a2) (+.f64 (cos.f64 th) (/.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 a2 a2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (cos.f64 th) (/.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 a2 a2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (cos.f64 th) (/.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 a2 a2))))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (cos.f64 th) (/.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 a2 a2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (cos.f64 th) (/.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 a2 a2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (cos.f64 th) (/.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 a2 a2))))
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 th 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 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
(* (pow a1 2) (+ 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 (/ (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 (/ (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 (/ (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 (/ (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) (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 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 a2 (*.f64 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 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) a2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (/.f64 a1 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) 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)
(*.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) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (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 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.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 (*.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 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))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (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 th th) (*.f64 (*.f64 a2 a2) (+.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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) a2)
(+ a2 (* (pow th 2) (+ (* -1/2 a2) (* 1/24 (* a2 (pow th 2))))))
(+.f64 a2 (*.f64 (*.f64 a2 (*.f64 th th)) (+.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 th th) (*.f64 a2 (+.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) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (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 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.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 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.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 #s(literal 1 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 -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 #s(literal 1 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 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 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.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 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 #s(literal 1 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 -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 #s(literal 1 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 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 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.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 (cos.f64 th)) (/.f64 a2 (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 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 (cos.f64 th) a1) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (+.f64 (*.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 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (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) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th 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 #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)))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
(+ (sqrt 2) (* 1/2 (* (pow th 2) (sqrt 2))))
(*.f64 (+.f64 (*.f64 (*.f64 th th) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (sqrt 2) (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2)))))
(+.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -5/24 binary64) (*.f64 th th)) #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 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5/24 binary64)) (*.f64 th (*.f64 th (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -61/720 binary64))))))) (*.f64 (+.f64 (*.f64 (*.f64 th th) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 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))
(/ 1 (pow a2 2))
(/.f64 #s(literal 1 binary64) (*.f64 a2 a2))
(+ (* -1 (/ (pow a1 2) (pow a2 4))) (/ 1 (pow a2 2)))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 a2 a2))
(+ (* (pow a1 2) (- (/ (pow a1 2) (pow a2 6)) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))
(+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 a2 a2)))
(+ (* (pow a1 2) (- (* (pow a1 2) (+ (* -1 (/ (pow a1 2) (pow a2 8))) (/ 1 (pow a2 6)))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))
(+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (*.f64 a1 a1) (pow.f64 a2 #s(literal 8 binary64)))))) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 a2 a2)))
(/ 1 (pow a1 2))
(/.f64 #s(literal 1 binary64) (*.f64 a1 a1))
(/ (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))) (pow a1 2))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (*.f64 a1 a1))
(/ (- (+ 1 (/ (pow a2 4) (pow a1 4))) (/ (pow a2 2) (pow a1 2))) (pow a1 2))
(/.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))) (*.f64 a1 a1))
(/ (- (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))) (+ (* -1 (/ (pow a2 4) (pow a1 4))) (/ (pow a2 2) (pow a1 2)))) (pow a1 2))
(/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 a1 a1))
(/ 1 (pow a1 2))
(/.f64 #s(literal 1 binary64) (*.f64 a1 a1))
(/ (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))) (pow a1 2))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (*.f64 a1 a1))
(/ (- (+ 1 (/ (pow a2 4) (pow a1 4))) (/ (pow a2 2) (pow a1 2))) (pow a1 2))
(/.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))) (*.f64 a1 a1))
(/ (- (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))) (+ (* -1 (/ (pow a2 4) (pow a1 4))) (/ (pow a2 2) (pow a1 2)))) (pow a1 2))
(/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 a1 a1))
(/ 1 (pow a1 2))
(/.f64 #s(literal 1 binary64) (*.f64 a1 a1))
(+ (* -1 (/ (pow a2 2) (pow a1 4))) (/ 1 (pow a1 2)))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (*.f64 a1 a1))
(+ (* (pow a2 2) (- (/ (pow a2 2) (pow a1 6)) (/ 1 (pow a1 4)))) (/ 1 (pow a1 2)))
(+.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (pow.f64 a1 #s(literal 6 binary64))) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (*.f64 a1 a1)))
(+ (* (pow a2 2) (- (* (pow a2 2) (+ (* -1 (/ (pow a2 2) (pow a1 8))) (/ 1 (pow a1 6)))) (/ 1 (pow a1 4)))) (/ 1 (pow a1 2)))
(+.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a1 #s(literal 6 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 a1 #s(literal 8 binary64)))))) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (*.f64 a1 a1)))
(/ 1 (pow a2 2))
(/.f64 #s(literal 1 binary64) (*.f64 a2 a2))
(/ (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))) (pow a2 2))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 a2 a2))
(/ (- (+ 1 (/ (pow a1 4) (pow a2 4))) (/ (pow a1 2) (pow a2 2))) (pow a2 2))
(/.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 a2 a2))
(/ (- (+ 1 (* -1 (/ (pow a1 6) (pow a2 6)))) (+ (* -1 (/ (pow a1 4) (pow a2 4))) (/ (pow a1 2) (pow a2 2)))) (pow a2 2))
(/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 a2 a2))
(/ 1 (pow a2 2))
(/.f64 #s(literal 1 binary64) (*.f64 a2 a2))
(/ (+ 1 (* -1 (/ (pow a1 2) (pow a2 2)))) (pow a2 2))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 a2 a2))
(/ (- (+ 1 (/ (pow a1 4) (pow a2 4))) (/ (pow a1 2) (pow a2 2))) (pow a2 2))
(/.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 a2 a2))
(/ (- (+ 1 (* -1 (/ (pow a1 6) (pow a2 6)))) (+ (* -1 (/ (pow a1 4) (pow a2 4))) (/ (pow a1 2) (pow a2 2)))) (pow a2 2))
(/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 a2 a2))

eval415.0ms (3.9%)

Compiler

Compiled 74735 to 2970 computations (96% saved)

prune271.0ms (2.6%)

Pruning

31 alts after pruning (29 fresh and 2 done)

PrunedKeptTotal
New2469292498
Fresh808
Picked325
Done000
Total2480312511
Accuracy
100.0%
Counts
2511 → 31
Alt Table
Click to see full alt table
StatusAccuracyProgram
53.7%
(/.f64 (/.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 a1 a2)) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))
10.2%
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64)))
60.0%
(/.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))))
5.5%
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64)))
16.2%
(/.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
68.9%
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
16.1%
(/.f64 (-.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)))) (sqrt.f64 #s(literal 2 binary64)))
7.8%
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.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 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
60.1%
(/.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)))))
✓99.6%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
57.3%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 (*.f64 (*.f64 th th) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
✓68.9%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
99.1%
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
▶18.1%
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
10.1%
(/.f64 (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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))))) (sqrt.f64 #s(literal 2 binary64)))
30.6%
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))
59.8%
(/.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.2%
(/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
99.2%
(/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
68.6%
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
▶58.6%
(/.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)))) (sqrt.f64 #s(literal 2 binary64)))
▶11.7%
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
99.2%
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) a2)))
68.9%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
68.8%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
10.1%
(*.f64 (/.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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)))))
99.2%
(*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2)
▶99.1%
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
68.9%
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
99.1%
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)) (cos.f64 th))
▶99.2%
(*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
Compiler

Compiled 1581 to 802 computations (49.3% saved)

simplify218.0ms (2.1%)

Algorithm
1×egg-herbie
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓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 a2 a2))
✓cost-diff0
(/.f64 #s(literal 1 binary64) (+.f64 a1 a2))
✓cost-diff0
(/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2))
✓cost-diff1152
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
✓cost-diff1152
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))
✓cost-diff256
(*.f64 a1 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)))
✓cost-diff384
(*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
✓cost-diff384
(/.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)))) (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(sqrt.f64 #s(literal 2 binary64))
✓cost-diff0
(*.f64 a1 a1)
✓cost-diff0
(/.f64 (*.f64 a1 a1) (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
(cos.f64 th)
✓cost-diff0
(*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
Rules
3058×*-lowering-*.f32
3058×*-lowering-*.f64
1814×fma-define
1798×/-lowering-/.f32
1798×/-lowering-/.f64
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
030190
184188
2248179
31305158
44540158
08271158
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(* (cos th) (* (/ a2 (sqrt 2)) a2))
(cos th)
th
(* (/ a2 (sqrt 2)) a2)
(/ a2 (sqrt 2))
a2
(sqrt 2)
2
(/ (* a1 a1) (sqrt 2))
(* a1 a1)
a1
(sqrt 2)
2
(/ (* a1 (* a1 (+ 1 (/ (/ (* a2 a2) a1) a1)))) (sqrt 2))
(* a1 (* a1 (+ 1 (/ (/ (* a2 a2) a1) a1))))
a1
(* a1 (+ 1 (/ (/ (* a2 a2) a1) a1)))
(+ 1 (/ (/ (* a2 a2) a1) a1))
1
(/ (/ (* a2 a2) a1) a1)
(/ (* a2 a2) a1)
(* a2 a2)
a2
(sqrt 2)
2
(/ (* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (- (* a1 a1) (* a2 a2)))) (sqrt 2))
(* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (- (* a1 a1) (* a2 a2))))
(/ (/ 1 (+ a1 a2)) (- a1 a2))
(/ 1 (+ a1 a2))
1
(+ a1 a2)
a1
a2
(- a1 a2)
(* (+ (* a1 a1) (* a2 a2)) (- (* a1 a1) (* a2 a2)))
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
(* a2 a2)
(- (* a1 a1) (* a2 a2))
(sqrt 2)
2
(* (/ (cos th) (sqrt 2)) (* a2 a2))
(/ (cos th) (sqrt 2))
(cos th)
th
(sqrt 2)
2
(* a2 a2)
a2
Outputs
(* (cos th) (* (/ a2 (sqrt 2)) a2))
(/.f64 (*.f64 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64)))
(cos th)
(cos.f64 th)
th
(* (/ a2 (sqrt 2)) a2)
(*.f64 a2 (/.f64 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)
(/ (* a1 a1) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* a1 a1)
(*.f64 a1 a1)
a1
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(/ (* a1 (* a1 (+ 1 (/ (/ (* a2 a2) a1) a1)))) (sqrt 2))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(* a1 (* a1 (+ 1 (/ (/ (* a2 a2) a1) a1))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
a1
(* a1 (+ 1 (/ (/ (* a2 a2) a1) a1)))
(+.f64 a1 (/.f64 (*.f64 a2 a2) a1))
(+ 1 (/ (/ (* a2 a2) a1) a1))
(+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
1
#s(literal 1 binary64)
(/ (/ (* a2 a2) a1) a1)
(/.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(/ (* a2 a2) a1)
(/.f64 (*.f64 a2 a2) a1)
(* a2 a2)
(*.f64 a2 a2)
a2
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(/ (* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (- (* a1 a1) (* a2 a2)))) (sqrt 2))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (- (* a1 a1) (* a2 a2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(/ (/ 1 (+ a1 a2)) (- a1 a2))
(/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2))
(/ 1 (+ a1 a2))
(/.f64 #s(literal 1 binary64) (+.f64 a2 a1))
1
#s(literal 1 binary64)
(+ a1 a2)
(+.f64 a2 a1)
a1
a2
(- a1 a2)
(-.f64 a1 a2)
(* (+ (* a1 a1) (* a2 a2)) (- (* a1 a1) (* a2 a2)))
(*.f64 (-.f64 a1 a2) (*.f64 (+.f64 a2 a1) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(+ (* a1 a1) (* a2 a2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* a1 a1)
(*.f64 a1 a1)
(* a2 a2)
(*.f64 a2 a2)
(- (* a1 a1) (* a2 a2))
(-.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(* (/ (cos th) (sqrt 2)) (* a2 a2))
(/.f64 (*.f64 a2 (*.f64 (cos.f64 th) a2)) (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)
(* a2 a2)
(*.f64 a2 a2)
a2

localize196.0ms (1.9%)

Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy100.0%
(cos.f64 th)
✓accuracy99.6%
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
✓accuracy98.9%
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
✓accuracy99.8%
(/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2))
✓accuracy99.7%
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
✓accuracy95.7%
(-.f64 (*.f64 a1 a1) (*.f64 a2 a2))
✓accuracy39.2%
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
✓accuracy94.7%
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
✓accuracy88.8%
(/.f64 (*.f64 a2 a2) a1)
✓accuracy88.5%
(*.f64 a1 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)))
✓accuracy87.4%
(*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))
✓accuracy100.0%
(*.f64 a1 a1)
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy99.7%
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
✓accuracy100.0%
(cos.f64 th)
✓accuracy99.9%
(*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
✓accuracy99.8%
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
✓accuracy99.4%
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
Results
137.0ms256×0valid
Compiler

Compiled 251 to 31 computations (87.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 47.0ms
ival-div: 16.0ms (33.9% of total)
ival-mult: 15.0ms (31.8% of total)
ival-cos: 7.0ms (14.8% of total)
ival-sub: 4.0ms (8.5% of total)
ival-add: 4.0ms (8.5% of total)
ival-sqrt: 2.0ms (4.2% of total)
const: 1.0ms (2.1% of total)
backward-pass: 0.0ms (0% of total)

series33.0ms (0.3%)

Counts
20 → 384
Calls
Call 1
Inputs
#<alt (* (cos th) (* (/ a2 (sqrt 2)) a2))>
#<alt (cos th)>
#<alt (* (/ a2 (sqrt 2)) a2)>
#<alt (/ a2 (sqrt 2))>
#<alt (/ (* a1 a1) (sqrt 2))>
#<alt (* a1 a1)>
#<alt (sqrt 2)>
#<alt (/ (* a1 (* a1 (+ 1 (/ (/ (* a2 a2) a1) a1)))) (sqrt 2))>
#<alt (* a1 (* a1 (+ 1 (/ (/ (* a2 a2) a1) a1))))>
#<alt (* a1 (+ 1 (/ (/ (* a2 a2) a1) a1)))>
#<alt (+ 1 (/ (/ (* a2 a2) a1) a1))>
#<alt (/ (* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (- (* a1 a1) (* a2 a2)))) (sqrt 2))>
#<alt (* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (- (* a1 a1) (* a2 a2))))>
#<alt (/ (/ 1 (+ a1 a2)) (- a1 a2))>
#<alt (/ 1 (+ a1 a2))>
#<alt (* (/ (cos th) (sqrt 2)) (* a2 a2))>
#<alt (/ (cos th) (sqrt 2))>
#<alt (/ (* a2 a2) a1)>
#<alt (/ (/ (* a2 a2) a1) a1)>
#<alt (- (* a1 a1) (* a2 a2))>
Outputs
#<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))>
#<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 (/ 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 a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ (pow a1 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) (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 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) a1)>
#<alt (/ (+ (pow a1 2) (pow a2 2)) a1)>
#<alt (/ (+ (pow a1 2) (pow a2 2)) a1)>
#<alt (/ (+ (pow a1 2) (pow a2 2)) a1)>
#<alt a1>
#<alt (* a1 (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt (* a1 (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt (* a1 (+ 1 (/ (pow a2 2) (pow a1 2))))>
#<alt a1>
#<alt (* -1 (* a1 (- (* -1 (/ (pow a2 2) (pow a1 2))) 1)))>
#<alt (* -1 (* a1 (- (* -1 (/ (pow a2 2) (pow a1 2))) 1)))>
#<alt (* -1 (* a1 (- (* -1 (/ (pow a2 2) (pow a1 2))) 1)))>
#<alt a1>
#<alt (+ a1 (/ (pow a2 2) a1))>
#<alt (+ a1 (/ (pow a2 2) a1))>
#<alt (+ a1 (/ (pow a2 2) a1))>
#<alt (/ (pow a2 2) a1)>
#<alt (* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))>
#<alt (* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))>
#<alt (* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))>
#<alt (/ (pow a2 2) a1)>
#<alt (* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))>
#<alt (* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))>
#<alt (* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))>
#<alt 1>
#<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 (/ (pow a2 2) (pow a1 2))>
#<alt (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))>
#<alt (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))>
#<alt (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))>
#<alt (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))>
#<alt (* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))>
#<alt (/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))>
#<alt (/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))>
#<alt 1>
#<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>
#<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 (/ (pow a2 2) (sqrt 2))>
#<alt (+ (/ (* a1 (+ a2 (* -1 a2))) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (* a1 (- (* a1 (- (+ (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (* (pow a2 2) (sqrt 2)))) (/ 1 (sqrt 2))) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (+ a2 (* -1 a2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (* a1 (- (* a1 (- (+ (* -1 (* a1 (+ (* -1 (/ (* (+ a2 (* -1 a2)) (- (+ (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (* (pow a2 2) (sqrt 2)))) (/ 1 (sqrt 2))) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (* (pow a2 2) (sqrt 2)))))) (pow a2 2))) (* -1 (/ (+ a2 (* -1 a2)) (* (pow a2 2) (sqrt 2))))))) (+ (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (* (pow a2 2) (sqrt 2)))) (/ 1 (sqrt 2)))) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (+ a2 (* -1 a2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))) a1)) (/ 1 (sqrt 2))))>
#<alt (* (pow a1 2) (- (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ a2 (* a1 (sqrt 2)))) (+ (* -1 (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (pow a1 2))) (/ a2 (* a1 (sqrt 2)))))))>
#<alt (* (pow a1 2) (- (+ (* -1 (/ (+ (* (+ a2 (* -1 a2)) (- (/ (pow a2 2) (sqrt 2)) (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))))))) (* (pow a2 2) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))))) (pow a1 3))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (+ (* -1 (/ a2 (* a1 (sqrt 2)))) (+ (* -1 (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (pow a1 2))) (/ a2 (* a1 (sqrt 2)))))))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))) a1)) (/ 1 (sqrt 2))))>
#<alt (* (pow a1 2) (+ (* -1 (/ (- (+ (* -1 (/ a2 (sqrt 2))) (+ (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (* a1 (sqrt 2)))) (/ a2 (sqrt 2)))) (+ (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) a1) (/ (pow a2 2) (* a1 (sqrt 2))))) a1)) (/ 1 (sqrt 2))))>
#<alt (* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (+ (* -1 (/ (+ (* -1 (- (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (sqrt 2))) (+ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (/ (pow a2 2) (sqrt 2))))) (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (- (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (sqrt 2))) (+ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (/ (pow a2 2) (sqrt 2)))))) (* (pow a2 2) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))))) a1))) a1)) (/ a2 (sqrt 2)))) a1)) (/ 1 (sqrt 2))))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (+ (* -1 (* a2 (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))>
#<alt (+ (* a2 (- (* a2 (- (/ 1 (sqrt 2)) (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (pow a1 2))))) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))>
#<alt (+ (* a2 (- (* a2 (- (+ (* -1 (/ (* a2 (* (+ a1 (* -1 a1)) (- (/ 1 (sqrt 2)) (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (pow a1 2)))))) (pow a1 2))) (/ 1 (sqrt 2))) (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (pow a1 2))))) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (* (pow a2 2) (+ (* -1 (/ a1 (* a2 (sqrt 2)))) (+ (/ 1 (sqrt 2)) (/ a1 (* a2 (sqrt 2))))))>
#<alt (* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (* (pow a2 2) (sqrt 2)))) (/ 1 (sqrt 2))) (+ (* -1 (/ (+ a1 (* -1 a1)) (* a2 (sqrt 2)))) (+ (* -1 (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (* (pow a2 2) (sqrt 2))))))))>
#<alt (* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (* (+ a1 (* -1 a1)) (- (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (+ (* -1 (/ (pow a1 2) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2))))))) (* -1 (/ (* (pow a1 2) (+ a1 (* -1 a1))) (sqrt 2)))) (pow a2 3))) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (* (pow a2 2) (sqrt 2)))) (/ 1 (sqrt 2)))) (+ (* -1 (/ (+ a1 (* -1 a1)) (* a2 (sqrt 2)))) (+ (* -1 (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (* (pow a2 2) (sqrt 2))))))))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (* (pow a2 2) (+ (* -1 (/ (+ a1 (* -1 a1)) (* a2 (sqrt 2)))) (/ 1 (sqrt 2))))>
#<alt (* (pow a2 2) (+ (* -1 (/ (- (* -1 (/ (- (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (+ (* -1 (/ (pow a1 2) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2))))) a2)) (* -1 (/ (+ a1 (* -1 a1)) (sqrt 2)))) a2)) (/ 1 (sqrt 2))))>
#<alt (* (pow a2 2) (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a1 (* -1 a1)) (- (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (+ (* -1 (/ (pow a1 2) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2)))))) a2)) (+ (* -1 (/ (* (pow a1 2) (+ a1 (* -1 a1))) (* a2 (sqrt 2)))) (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))))) (+ (* -1 (/ (pow a1 2) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2))))) a2)) (* -1 (/ (+ a1 (* -1 a1)) (sqrt 2)))) a2)) (/ 1 (sqrt 2))))>
#<alt (pow a2 2)>
#<alt (+ (* a1 (+ a2 (* -1 a2))) (pow a2 2))>
#<alt (+ (* a1 (- (* a1 (- (+ 1 (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (pow a2 2)))) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a2 2))))) (* -1 (+ a2 (* -1 a2))))) (pow a2 2))>
#<alt (+ (* a1 (- (* a1 (- (+ 1 (+ (* -1 (* a1 (+ (* -1 (/ (* (+ a2 (* -1 a2)) (- (+ 1 (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (pow a2 2)))) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a2 2))))) (pow a2 2))) (* -1 (/ (+ a2 (* -1 a2)) (pow a2 2)))))) (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (pow a2 2))))) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a2 2))))) (* -1 (+ a2 (* -1 a2))))) (pow a2 2))>
#<alt (pow a1 2)>
#<alt (* (pow a1 2) (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))))>
#<alt (* (pow a1 2) (- (+ 1 (/ (pow a2 2) (pow a1 2))) (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a1 2))) (/ a2 a1)))))>
#<alt (* (pow a1 2) (- (+ 1 (+ (* -1 (/ (+ (* (+ a2 (* -1 a2)) (- (pow a2 2) (* -1 (pow (+ a2 (* -1 a2)) 2)))) (* (pow a2 2) (+ a2 (* -1 a2)))) (pow a1 3))) (/ (pow a2 2) (pow a1 2)))) (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a1 2))) (/ a2 a1)))))>
#<alt (pow a1 2)>
#<alt (* (pow a1 2) (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))))>
#<alt (* (pow a1 2) (+ 1 (* -1 (/ (- (+ a2 (+ (* -1 a2) (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) a1)))) (+ (/ (pow a2 2) a1) (/ (pow (+ a2 (* -1 a2)) 2) a1))) a1))))>
#<alt (* (pow a1 2) (+ 1 (* -1 (/ (+ a2 (+ (* -1 a2) (* -1 (/ (+ (* -1 (- (* -1 (+ (* -1 (pow a2 2)) (pow a2 2))) (+ (pow a2 2) (pow (+ a2 (* -1 a2)) 2)))) (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (- (* -1 (+ (* -1 (pow a2 2)) (pow a2 2))) (+ (pow a2 2) (pow (+ a2 (* -1 a2)) 2))))) (* (pow a2 2) (+ a2 (* -1 a2)))) a1))) a1)))) a1))))>
#<alt (pow a1 2)>
#<alt (+ (* -1 (* a2 (+ a1 (* -1 a1)))) (pow a1 2))>
#<alt (+ (* a2 (- (* a2 (- 1 (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (pow a1 2))))) (+ a1 (* -1 a1)))) (pow a1 2))>
#<alt (+ (* a2 (- (* a2 (- (+ 1 (* -1 (/ (* a2 (* (+ a1 (* -1 a1)) (- 1 (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (pow a1 2)))))) (pow a1 2)))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (pow a1 2))))) (+ a1 (* -1 a1)))) (pow a1 2))>
#<alt (pow a2 2)>
#<alt (* (pow a2 2) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2))))>
#<alt (* (pow a2 2) (- (+ 1 (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (pow a2 2)))) (+ (* -1 (/ (+ a1 (* -1 a1)) a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (pow a2 2)))))))>
#<alt (* (pow a2 2) (- (+ 1 (+ (* -1 (/ (+ (* -1 (* (+ a1 (* -1 a1)) (- (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (+ (* -1 (pow a1 2)) (* -1 (pow (+ a1 (* -1 a1)) 2)))))) (* -1 (* (pow a1 2) (+ a1 (* -1 a1))))) (pow a2 3))) (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (pow a2 2))))) (+ (* -1 (/ (+ a1 (* -1 a1)) a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (pow a2 2)))))))>
#<alt (pow a2 2)>
#<alt (* (pow a2 2) (+ 1 (* -1 (/ (+ a1 (* -1 a1)) a2))))>
#<alt (* (pow a2 2) (+ 1 (* -1 (/ (- (* -1 (/ (- (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (+ (* -1 (pow a1 2)) (* -1 (pow (+ a1 (* -1 a1)) 2)))) a2)) (* -1 (+ a1 (* -1 a1)))) a2))))>
#<alt (* (pow a2 2) (+ 1 (* -1 (/ (- (* -1 (/ (- (+ (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (+ (* -1 (/ (* (+ a1 (* -1 a1)) (- (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (+ (* -1 (pow a1 2)) (* -1 (pow (+ a1 (* -1 a1)) 2))))) a2)) (* -1 (/ (* (pow a1 2) (+ a1 (* -1 a1))) a2)))) (+ (* -1 (pow a1 2)) (* -1 (pow (+ a1 (* -1 a1)) 2)))) a2)) (* -1 (+ a1 (* -1 a1)))) a2))))>
#<alt (/ -1 (pow a2 2))>
#<alt (- (* -1 (/ (pow a1 2) (pow a2 4))) (/ 1 (pow a2 2)))>
#<alt (- (* (pow a1 2) (- (* -1 (/ (pow a1 2) (pow a2 6))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))>
#<alt (- (* (pow a1 2) (- (* (pow a1 2) (- (* -1 (/ (pow a1 2) (pow a2 8))) (/ 1 (pow a2 6)))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))>
#<alt (/ 1 (pow a1 2))>
#<alt (/ (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))) (pow a1 2))>
#<alt (/ (- (+ 1 (* -1 (/ (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2))) (pow a1 2)))) (+ (* -1 (/ a2 a1)) (/ a2 a1))) (pow a1 2))>
#<alt (/ (- (+ 1 (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2))))) (* (pow a2 2) (+ a2 (* -1 a2)))) (pow a1 3)))) (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a1 2))) (/ a2 a1))))) (pow a1 2))>
#<alt (/ 1 (pow a1 2))>
#<alt (/ (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))) (pow a1 2))>
#<alt (/ (+ 1 (* -1 (/ (- (+ (* -1 (/ (pow a2 2) a1)) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) a1))) (* -1 (+ a2 (* -1 a2)))) a1))) (pow a1 2))>
#<alt (/ (+ 1 (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (pow a2 2) (+ a2 (* -1 a2))) a1)) (/ (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2)))) a1)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2)))) a1)) (* -1 (+ a2 (* -1 a2)))) a1))) (pow a1 2))>
#<alt (/ 1 (pow a1 2))>
#<alt (+ (/ 1 (pow a1 2)) (/ (pow a2 2) (pow a1 4)))>
#<alt (+ (* (pow a2 2) (+ (/ 1 (pow a1 4)) (/ (pow a2 2) (pow a1 6)))) (/ 1 (pow a1 2)))>
#<alt (+ (* (pow a2 2) (+ (* (pow a2 2) (+ (/ 1 (pow a1 6)) (/ (pow a2 2) (pow a1 8)))) (/ 1 (pow a1 4)))) (/ 1 (pow a1 2)))>
#<alt (/ -1 (pow a2 2))>
#<alt (/ (- (* -1 (/ (+ a1 (* -1 a1)) a2)) 1) (pow a2 2))>
#<alt (/ (- (* -1 (/ (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2)) (pow a2 2))) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2)))) (pow a2 2))>
#<alt (/ (- (* -1 (/ (+ (* (+ a1 (* -1 a1)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) (* (pow a1 2) (+ a1 (* -1 a1)))) (pow a2 3))) (+ 1 (+ (* -1 (/ a1 a2)) (+ (/ a1 a2) (+ (/ (pow a1 2) (pow a2 2)) (/ (pow (+ a1 (* -1 a1)) 2) (pow a2 2))))))) (pow a2 2))>
#<alt (/ -1 (pow a2 2))>
#<alt (/ (- (+ (* -1 (/ a1 a2)) (/ a1 a2)) 1) (pow a2 2))>
#<alt (/ (- (* -1 (/ (- (+ (/ (pow a1 2) a2) (/ (pow (+ a1 (* -1 a1)) 2) a2)) (+ a1 (* -1 a1))) a2)) 1) (pow a2 2))>
#<alt (/ (- (* -1 (/ (- (* -1 (/ (- (+ (/ (* (+ a1 (* -1 a1)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) a2) (/ (* (pow a1 2) (+ a1 (* -1 a1))) a2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) a2)) (+ a1 (* -1 a1))) a2)) 1) (pow a2 2))>
#<alt (/ 1 a2)>
#<alt (+ (* -1 (/ a1 (pow a2 2))) (/ 1 a2))>
#<alt (+ (* a1 (- (/ a1 (pow a2 3)) (/ 1 (pow a2 2)))) (/ 1 a2))>
#<alt (+ (* a1 (- (* a1 (+ (* -1 (/ a1 (pow a2 4))) (/ 1 (pow a2 3)))) (/ 1 (pow a2 2)))) (/ 1 a2))>
#<alt (/ 1 a1)>
#<alt (/ (+ 1 (* -1 (/ a2 a1))) a1)>
#<alt (/ (- (+ 1 (/ (pow a2 2) (pow a1 2))) (/ a2 a1)) a1)>
#<alt (/ (- (+ 1 (* -1 (/ (pow a2 3) (pow a1 3)))) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (/ a2 a1))) a1)>
#<alt (/ 1 a1)>
#<alt (* -1 (/ (- (/ a2 a1) 1) a1))>
#<alt (* -1 (/ (- (* -1 (/ (- (/ (pow a2 2) a1) a2) a1)) 1) a1))>
#<alt (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow a2 3) a1) (pow a2 2)) a1)) a2) a1)) 1) a1))>
#<alt (/ 1 a1)>
#<alt (+ (* -1 (/ a2 (pow a1 2))) (/ 1 a1))>
#<alt (+ (* a2 (- (/ a2 (pow a1 3)) (/ 1 (pow a1 2)))) (/ 1 a1))>
#<alt (+ (* a2 (- (* a2 (+ (* -1 (/ a2 (pow a1 4))) (/ 1 (pow a1 3)))) (/ 1 (pow a1 2)))) (/ 1 a1))>
#<alt (/ 1 a2)>
#<alt (/ (+ 1 (* -1 (/ a1 a2))) a2)>
#<alt (/ (- (+ 1 (/ (pow a1 2) (pow a2 2))) (/ a1 a2)) a2)>
#<alt (/ (- (+ 1 (* -1 (/ (pow a1 3) (pow a2 3)))) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (/ a1 a2))) a2)>
#<alt (/ 1 a2)>
#<alt (* -1 (/ (- (/ a1 a2) 1) a2))>
#<alt (* -1 (/ (- (* -1 (/ (- (/ (pow a1 2) a2) a1) a2)) 1) a2))>
#<alt (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow a1 3) a2) (pow a1 2)) a2)) a1) a2)) 1) a2))>
#<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))>
#<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) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) a1)>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<alt (/ (pow a2 2) (pow a1 2))>
#<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

96 calls:

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

rewrite315.0ms (3%)

Algorithm
1×batch-egg-rewrite
Rules
4314×/-lowering-/.f32
4314×/-lowering-/.f64
3538×*-lowering-*.f32
3538×*-lowering-*.f64
1954×+-lowering-+.f64
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
030149
1185117
21598111
08667111
Stop Event
1×iter limit
1×node limit
Counts
20 → 675
Calls
Call 1
Inputs
(* (cos th) (* (/ a2 (sqrt 2)) a2))
(cos th)
(* (/ a2 (sqrt 2)) a2)
(/ a2 (sqrt 2))
(/ (* a1 a1) (sqrt 2))
(* a1 a1)
(sqrt 2)
(/ (* a1 (* a1 (+ 1 (/ (/ (* a2 a2) a1) a1)))) (sqrt 2))
(* a1 (* a1 (+ 1 (/ (/ (* a2 a2) a1) a1))))
(* a1 (+ 1 (/ (/ (* a2 a2) a1) a1)))
(+ 1 (/ (/ (* a2 a2) a1) a1))
(/ (* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (- (* a1 a1) (* a2 a2)))) (sqrt 2))
(* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (- (* a1 a1) (* a2 a2))))
(/ (/ 1 (+ a1 a2)) (- a1 a2))
(/ 1 (+ a1 a2))
(* (/ (cos th) (sqrt 2)) (* a2 a2))
(/ (cos th) (sqrt 2))
(/ (* a2 a2) a1)
(/ (/ (* a2 a2) a1) a1)
(- (* a1 a1) (* a2 a2))
Outputs
(/.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 #s(literal 0 binary64) (*.f64 a2 a2)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.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 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a2 a2) (-.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)) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (-.f64 #s(literal 0 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 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(*.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)))
(*.f64 a2 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (cos.f64 th)))
(*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (cos.f64 th))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(cos.f64 th)
(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 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/.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) a2) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a2 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 #s(literal 1 binary64) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (neg.f64 (*.f64 a2 #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) a2)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal -1 binary64))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a2 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 a2 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
(/.f64 (-.f64 #s(literal 0 binary64) a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) a2)) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a2 #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 a2 #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) a2))) (neg.f64 (neg.f64 (-.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))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal 1 binary64)) #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 (-.f64 #s(literal 0 binary64) a2) (/.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/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)))
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1)) #s(literal -1 binary64)))
(exp.f64 (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 a1)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (/.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/2 binary64)) (*.f64 a1 a1))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) #s(literal -1 binary64)))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a1)))
(pow.f64 a1 #s(literal 2 binary64))
(pow.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 0 binary64) a1) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 a1)) #s(literal 2 binary64))
(*.f64 a1 a1)
(*.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(*.f64 #s(literal 1 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)))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 a1 (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))))))
(/.f64 (*.f64 a1 (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))) #s(literal 1 binary64))))
(/.f64 (*.f64 (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) a1))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 a1 (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) a1)))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a1 (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a1 (/.f64 (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a1 a1) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (*.f64 (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a1 (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) a1)) (/.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/2 binary64)) (*.f64 a1 (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))))) #s(literal -1 binary64)))
(*.f64 (/.f64 (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) a1)
(+.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))))
(+.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))))
(+.f64 (*.f64 a1 a1) (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)) a1))
(+.f64 (*.f64 a1 a1) (*.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (*.f64 a1 a1)))
(+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))) (*.f64 a1 a1))
(+.f64 (*.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (*.f64 a1 a1)) (*.f64 a1 a1))
(fma.f64 a1 a1 (*.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))))
(fma.f64 a1 a1 (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)) a1))
(fma.f64 (*.f64 a1 a1) #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))))
(fma.f64 (*.f64 a1 a1) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (*.f64 a1 a1))
(fma.f64 #s(literal 1 binary64) (*.f64 a1 a1) (*.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (*.f64 a1 a1)))
(fma.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (*.f64 a1 a1) (*.f64 a1 a1))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)))))
(/.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))))) (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))))
(/.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (neg.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)))))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (pow.f64 (*.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))) (*.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (pow.f64 (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)) a1) #s(literal 3 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)) a1) (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)) a1)) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)) a1)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (pow.f64 (*.f64 (*.f64 a1 a1) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))) #s(literal 3 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))) #s(literal 3 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))) (*.f64 a1 a1)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (pow.f64 (*.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (*.f64 a1 a1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (*.f64 a1 a1)) #s(literal 3 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (*.f64 a1 a1))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (*.f64 a1 a1)) (*.f64 a1 a1)))))
(*.f64 a1 (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))))
(*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))) (*.f64 a1 a1))
(*.f64 (+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))) a1)
(+.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))
(+.f64 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)) a1)
(-.f64 (/.f64 (*.f64 a1 a1) (-.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))) (-.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))))
(fma.f64 a1 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))
(fma.f64 a1 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) a1)
(fma.f64 #s(literal 1 binary64) a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64) a1)
(fma.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) a1 a1)
(fma.f64 (*.f64 a1 (/.f64 (*.f64 a2 a2) a1)) (/.f64 #s(literal 1 binary64) a1) a1)
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 a1))) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))) (*.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))))))
(/.f64 (-.f64 (*.f64 a1 a1) (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))) (-.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))))
(/.f64 (*.f64 a1 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)))))
(/.f64 (*.f64 a1 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))))) (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) a1) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)))) a1) (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))))
(/.f64 (neg.f64 (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 a1))) #s(literal 1 binary64)))) (neg.f64 (+.f64 (*.f64 a1 a1) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))) (*.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))))) (neg.f64 (-.f64 a1 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 a1 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (neg.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))))))
(/.f64 (neg.f64 (*.f64 a1 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)))))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) a1)) (neg.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)))) a1)) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 a1))) #s(literal 1 binary64)) (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)) a1))))
(*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))) a1)
(+.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))))
(+.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))))) (/.f64 (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))) (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))))))
(-.f64 (/.f64 (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))) (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64))))
(fma.f64 a2 (*.f64 (/.f64 a2 a1) (/.f64 #s(literal 1 binary64) a1)) #s(literal 1 binary64))
(fma.f64 a2 (/.f64 a2 (*.f64 a1 a1)) #s(literal 1 binary64))
(fma.f64 a2 (/.f64 (/.f64 a2 a1) a1) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64))
(fma.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) #s(literal 1 binary64))
(fma.f64 (*.f64 a2 a2) (/.f64 (/.f64 #s(literal 1 binary64) a1) a1) #s(literal 1 binary64))
(fma.f64 (/.f64 (*.f64 a2 a2) a1) (/.f64 #s(literal 1 binary64) a1) #s(literal 1 binary64))
(fma.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 a2 a2) a1)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) a1)) #s(literal 1 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) a1) (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))
(fma.f64 (/.f64 a2 a1) (/.f64 a2 a1) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)))))))
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 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 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)))))
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (+.f64 (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))) (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))))))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)))) (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (neg.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (neg.f64 (+.f64 (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))) (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))))))
(/.f64 (-.f64 (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))) #s(literal 1 binary64)) (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))) (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)))))) (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))) #s(literal 1 binary64))) (neg.f64 (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64))))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))))) #s(literal -1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 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 1 binary64) (/.f64 (-.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64)) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 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))))
(neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.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))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.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 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 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 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.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 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (*.f64 (-.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (-.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 a1 a2))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.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 a1 a2))
(/.f64 (neg.f64 (*.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 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (-.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.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 #s(literal 0 binary64) (-.f64 a1 a2)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.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) (-.f64 #s(literal 0 binary64) (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 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.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))) (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 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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)) (/.f64 (+.f64 (*.f64 a1 a1) (*.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 #s(literal 1 binary64) (+.f64 a2 a1)) (-.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 a1 a2)))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(+.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 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 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 a1 a1)) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.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 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 (*.f64 a1 a1) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 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 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.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 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 a1 a1) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(fma.f64 (/.f64 (+.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 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 a2 a1)) (-.f64 a1 a2) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 a2 a1)) (-.f64 a1 a2) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 a2 a1) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.f64 (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 a2 a1) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.f64 (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.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 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 a1 a2) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.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 (*.f64 (*.f64 a1 a1) (*.f64 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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 a1 a2) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal -1 binary64) (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 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (*.f64 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 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 1 binary64) (+.f64 a2 a1)) (-.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 (*.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 -1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 (neg.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (-.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 a1 a1) (*.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 a2 a1))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1 a1) (*.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 a1 a1) (*.f64 a2 a2)))
(/.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 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 (*.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 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (neg.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (neg.f64 (-.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 (neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal 1 binary64))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.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 a1) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (/.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 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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 a1 a1)) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 a1 a1)) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))))
(pow.f64 (/.f64 (-.f64 a1 a2) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.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 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 #s(literal 1 binary64) (+.f64 a2 a1)) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 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 (-.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 (*.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 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 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 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 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)))
(*.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 a2 a1)) (-.f64 a1 a2))
(*.f64 (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 a2 a1))
(*.f64 (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 (*.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)))
(exp.f64 (*.f64 (log.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))) (/.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)))
(neg.f64 (/.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)))
(/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)) (-.f64 a1 a2))))
(/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (-.f64 a1 a2) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)))))
(/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2))
(/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(/.f64 #s(literal -1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)))
(/.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal -1 binary64) (*.f64 (-.f64 a1 a2) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1))))
(/.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(/.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))))
(/.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)) (+.f64 a2 a1))
(/.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 a1 a2))) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 a2))) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 a2 a1))))
(pow.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 #s(literal 1 binary64) (+.f64 a2 a1)) (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)))
(*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 a2 a1))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))))
(*.f64 (pow.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 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 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64)))
(*.f64 (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 a1) (*.f64 a2 a2))) #s(literal -1 binary64)))
(*.f64 (pow.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))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (pow.f64 (/.f64 (-.f64 a1 a2) #s(literal -1 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)))
(*.f64 (pow.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.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 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(exp.f64 (*.f64 (log.f64 (+.f64 a2 a1)) #s(literal -1 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)))
(/.f64 #s(literal 1 binary64) (+.f64 a2 a1))
(/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 a2 a1))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)))))
(pow.f64 (+.f64 a2 a1) #s(literal -1 binary64))
(pow.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 a2 a1))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (+.f64 a2 a1) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 a2 a1) (+.f64 a2 a1)) #s(literal -1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 a2 a1))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) #s(literal 1 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (pow.f64 (/.f64 (-.f64 a1 a2) (-.f64 a1 a2)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 a1 a2))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)) #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)))
(*.f64 (pow.f64 (+.f64 a2 a1) #s(literal -1/2 binary64)) (pow.f64 (+.f64 a2 a1) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (-.f64 a2 a1))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 (-.f64 a2 a1)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)))
(*.f64 (pow.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1)))))
(/.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 #s(literal 0 binary64) (*.f64 a2 a2)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.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 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a2 a2) (-.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)) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (-.f64 #s(literal 0 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 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(*.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)))
(*.f64 a2 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (cos.f64 th)))
(*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (cos.f64 th))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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) a2) (/.f64 a2 (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 (/.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 #s(literal 0 binary64) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 th) (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 (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)))
(exp.f64 (*.f64 (log.f64 (/.f64 a1 (*.f64 a2 a2))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) a1)) (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 a2 a2) a1)))
(neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 a2 a2) a1)))
(/.f64 #s(literal 1 binary64) (/.f64 a1 (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 a1 (*.f64 a2 a2)))))
(/.f64 (*.f64 a2 a2) a1)
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) a1))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 a1 (*.f64 a2 a2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64))))
(/.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) a1)
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (neg.f64 (-.f64 #s(literal 0 binary64) a1)))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) a1))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) a1))))
(pow.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 a1 (*.f64 a2 a2)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a2 (/.f64 a2 a1))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) a1))
(*.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) a1))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) a1)))
(*.f64 (/.f64 #s(literal 1 binary64) a1) (*.f64 a2 a2))
(*.f64 (/.f64 #s(literal 1 binary64) a1) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)))
(*.f64 (/.f64 a2 a1) a2)
(exp.f64 (log.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))))
(exp.f64 (*.f64 (log.f64 (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) a1)) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 a2 a2) a1)) a1))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 a2 a2) a1)) a1))
(/.f64 #s(literal 1 binary64) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)))))
(/.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/.f64 (/.f64 (*.f64 a2 a2) a1) (neg.f64 (-.f64 #s(literal 0 binary64) a1)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 a2 a2) a1)) (-.f64 #s(literal 0 binary64) a1))
(/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 a2 a2) a1)) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) a1))))
(/.f64 (/.f64 #s(literal 1 binary64) a1) (/.f64 a1 (*.f64 a2 a2)))
(/.f64 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64)) a1)
(/.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (*.f64 a1 a1))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 a2 a2) a1))) (-.f64 #s(literal 0 binary64) a1))
(/.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 1 binary64) a1)) (neg.f64 (/.f64 a1 (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a2 a2) a1) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) a1))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal 1 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 a2 a2) a1)))) (neg.f64 (-.f64 #s(literal 0 binary64) a1)))
(pow.f64 (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)) #s(literal -1 binary64))
(pow.f64 (/.f64 a2 a1) #s(literal 2 binary64))
(pow.f64 (/.f64 (/.f64 a1 (/.f64 (*.f64 a2 a2) a1)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1 binary64))
(*.f64 a2 (*.f64 (/.f64 a2 a1) (/.f64 #s(literal 1 binary64) a1)))
(*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))
(*.f64 a2 (/.f64 (/.f64 a2 a1) a1))
(*.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))))
(*.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)))
(*.f64 (*.f64 a2 a2) (/.f64 (/.f64 #s(literal 1 binary64) a1) a1))
(*.f64 (/.f64 (*.f64 a2 a2) a1) (/.f64 #s(literal 1 binary64) a1))
(*.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 a2 a2) a1)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) a1)))
(*.f64 (/.f64 #s(literal 1 binary64) a1) (/.f64 (*.f64 a2 a2) a1))
(*.f64 (/.f64 a2 a1) (/.f64 a2 a1))
(*.f64 (pow.f64 (/.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) a1)))
(+.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(+.f64 (*.f64 a1 a1) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(+.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(+.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(+.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (fma.f64 (neg.f64 (-.f64 #s(literal 0 binary64) a2)) (-.f64 #s(literal 0 binary64) a2) (*.f64 a2 a2)))
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))
(+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+.f64 (*.f64 (+.f64 a2 a1) a1) (*.f64 (+.f64 a2 a1) (-.f64 #s(literal 0 binary64) a2)))
(+.f64 (*.f64 (-.f64 a1 a2) a2) (*.f64 (-.f64 a1 a2) a1))
(+.f64 (*.f64 (-.f64 a1 a2) a1) (*.f64 (-.f64 a1 a2) a2))
(+.f64 (*.f64 a1 (+.f64 a2 a1)) (*.f64 (-.f64 #s(literal 0 binary64) a2) (+.f64 a2 a1)))
(+.f64 (*.f64 a2 (-.f64 a1 a2)) (*.f64 a1 (-.f64 a1 a2)))
(+.f64 (*.f64 a1 (-.f64 a1 a2)) (*.f64 a2 (-.f64 a1 a2)))
(-.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(-.f64 (*.f64 a1 a1) (-.f64 (*.f64 a2 a2) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(-.f64 (/.f64 a1 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))) (/.f64 a2 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))))
(-.f64 (/.f64 (*.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 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 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 a1 a1) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 1 binary64)))
(-.f64 (/.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (-.f64 (*.f64 a2 a2) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))) #s(literal 1 binary64)))
(-.f64 (/.f64 (/.f64 a1 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))) #s(literal 1 binary64)) (/.f64 (/.f64 a2 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))) #s(literal 1 binary64)))
(-.f64 (/.f64 (/.f64 (*.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 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 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 a1 a1) (+.f64 a2 a1)) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))) (/.f64 (/.f64 (*.f64 a2 a2) (+.f64 a2 a1)) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1)))) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))) (/.f64 (/.f64 (*.f64 a2 (*.f64 a2 a2)) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1)))) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1))) (/.f64 (-.f64 a1 a2) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))))) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(-.f64 (/.f64 (*.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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))) (-.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))))
(fma.f64 a2 (-.f64 a1 a2) (*.f64 a1 (-.f64 a1 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 a1 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.f64 a1 a1 (neg.f64 (-.f64 (*.f64 a2 a2) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))))
(fma.f64 a1 (+.f64 a2 a1) (*.f64 (-.f64 #s(literal 0 binary64) a2) (+.f64 a2 a1)))
(fma.f64 a1 (-.f64 a1 a2) (*.f64 a2 (-.f64 a1 a2)))
(fma.f64 (+.f64 a2 a1) a1 (*.f64 (+.f64 a2 a1) (-.f64 #s(literal 0 binary64) a2)))
(fma.f64 (+.f64 a2 a1) (-.f64 a1 a2) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (+.f64 a2 a1) (-.f64 a1 a2) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.f64 (-.f64 a1 a2) a2 (*.f64 (-.f64 a1 a2) a1))
(fma.f64 (-.f64 a1 a2) a1 (*.f64 (-.f64 a1 a2) a2))
(fma.f64 (-.f64 a1 a2) (+.f64 a2 a1) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (-.f64 a1 a2) (+.f64 a2 a1) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) a2 (*.f64 a1 a1))
(fma.f64 #s(literal -1 binary64) (*.f64 a2 a2) (*.f64 a1 a1))
(fma.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.f64 (/.f64 (-.f64 a1 a2) #s(literal 1 binary64)) (+.f64 a2 a1) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (/.f64 (-.f64 a1 a2) #s(literal 1 binary64)) (+.f64 a2 a1) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.f64 (/.f64 (-.f64 a1 a2) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (/.f64 (-.f64 a1 a2) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(fma.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 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 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (-.f64 a1 a2) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)))
(/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal -1 binary64) (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 a1 a2)) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1) (*.f64 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 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (+.f64 (*.f64 a1 a1) (*.f64 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 (-.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 (-.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 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (-.f64 a1 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 (-.f64 a2 a1))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1)))))
(/.f64 (*.f64 (-.f64 a1 a2) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 a1 a2))
(/.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (+.f64 a2 a1) (+.f64 (*.f64 a1 a1) (*.f64 a2 (-.f64 a2 a1)))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (-.f64 a2 a1)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)))
(/.f64 (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.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 (neg.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (-.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 (neg.f64 (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))))))
(/.f64 (+.f64 (*.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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))) (+.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))))
(/.f64 (/.f64 (-.f64 a1 a2) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)))
(/.f64 (-.f64 (*.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 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))) (-.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(/.f64 (*.f64 (+.f64 a2 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 a2 a1))
(/.f64 (*.f64 (+.f64 a2 a1) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))))
(/.f64 (*.f64 (-.f64 a1 a2) (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (-.f64 a2 a1))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 a1 a2)) (-.f64 a1 a2))
(/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 a1 a2)) (+.f64 (*.f64 a1 a1) (*.f64 a2 (-.f64 a2 a1))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 a2 a1)) (+.f64 a2 a1))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 a2 a1)) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))))
(/.f64 (-.f64 (*.f64 a1 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) a2)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))))
(/.f64 (-.f64 (*.f64 (*.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 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 (-.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 (-.f64 a1 a2) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (neg.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 (neg.f64 (/.f64 (-.f64 a1 a2) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (*.f64 (-.f64 a1 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 (-.f64 a2 a1))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (*.f64 (+.f64 a2 a1) (+.f64 (*.f64 a1 a1) (*.f64 a2 (-.f64 a2 a1))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (-.f64 a2 a1))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (neg.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (+.f64 (*.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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))))) (neg.f64 (+.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (-.f64 (*.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 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))) (neg.f64 (-.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)))
(/.f64 (neg.f64 (*.f64 (+.f64 a2 a1) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 (-.f64 a1 a2) (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 (-.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 a1 a2))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 a1 a2))) (neg.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 (-.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 a2 a1))) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 a2 a1))) (neg.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (pow.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))) #s(literal 3 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))))))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (pow.f64 (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.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 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))))
(/.f64 (+.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))) (*.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 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))) (-.f64 (*.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 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 a2 a1) a1) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 a2 a1) (-.f64 #s(literal 0 binary64) a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 a2 a1) a1) (*.f64 (+.f64 a2 a1) a1)) (-.f64 (*.f64 (*.f64 (+.f64 a2 a1) (-.f64 #s(literal 0 binary64) a2)) (*.f64 (+.f64 a2 a1) (-.f64 #s(literal 0 binary64) a2))) (*.f64 (*.f64 (+.f64 a2 a1) a1) (*.f64 (+.f64 a2 a1) (-.f64 #s(literal 0 binary64) a2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 a1 a2) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 a1 a2) a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 a1 a2) a2) (*.f64 (-.f64 a1 a2) a2)) (-.f64 (*.f64 (*.f64 (-.f64 a1 a2) a1) (*.f64 (-.f64 a1 a2) a1)) (*.f64 (*.f64 (-.f64 a1 a2) a2) (*.f64 (-.f64 a1 a2) a1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 a1 a2) a1) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 a1 a2) a2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 a1 a2) a1) (*.f64 (-.f64 a1 a2) a1)) (-.f64 (*.f64 (*.f64 (-.f64 a1 a2) a2) (*.f64 (-.f64 a1 a2) a2)) (*.f64 (*.f64 (-.f64 a1 a2) a1) (*.f64 (-.f64 a1 a2) a2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 a1 (+.f64 a2 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) a2) (+.f64 a2 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 (+.f64 a2 a1)) (*.f64 a1 (+.f64 a2 a1))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) a2) (+.f64 a2 a1)) (*.f64 (-.f64 #s(literal 0 binary64) a2) (+.f64 a2 a1))) (*.f64 (*.f64 a1 (+.f64 a2 a1)) (*.f64 (-.f64 #s(literal 0 binary64) a2) (+.f64 a2 a1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 a2 (-.f64 a1 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 a1 (-.f64 a1 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a2 (-.f64 a1 a2)) (*.f64 a2 (-.f64 a1 a2))) (-.f64 (*.f64 (*.f64 a1 (-.f64 a1 a2)) (*.f64 a1 (-.f64 a1 a2))) (*.f64 (*.f64 a2 (-.f64 a1 a2)) (*.f64 a1 (-.f64 a1 a2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 a1 (-.f64 a1 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 a2 (-.f64 a1 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 (-.f64 a1 a2)) (*.f64 a1 (-.f64 a1 a2))) (-.f64 (*.f64 (*.f64 a2 (-.f64 a1 a2)) (*.f64 a2 (-.f64 a1 a2))) (*.f64 (*.f64 a1 (-.f64 a1 a2)) (*.f64 a2 (-.f64 a1 a2))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64))
(pow.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64))
(*.f64 (+.f64 a2 a1) (-.f64 a1 a2))
(*.f64 (-.f64 a1 a2) (+.f64 a2 a1))
(*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 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 a2) #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 (*.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 a2) #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 (*.f64 (*.f64 a1 a1) (*.f64 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)))))

simplify198.0ms (1.9%)

Algorithm
1×egg-herbie
Rules
2362×*-lowering-*.f32
2362×*-lowering-*.f64
1544×+-lowering-+.f64
1544×+-lowering-+.f32
1070×fma-define
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
06464153
122932882
0106742882
Stop Event
1×iter limit
1×node limit
Counts
384 → 384
Calls
Call 1
Inputs
(/ (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))
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))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(/ (pow 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 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) a1)
(/ (+ (pow a1 2) (pow a2 2)) a1)
(/ (+ (pow a1 2) (pow a2 2)) a1)
(/ (+ (pow a1 2) (pow a2 2)) a1)
a1
(* a1 (+ 1 (/ (pow a2 2) (pow a1 2))))
(* a1 (+ 1 (/ (pow a2 2) (pow a1 2))))
(* a1 (+ 1 (/ (pow a2 2) (pow a1 2))))
a1
(* -1 (* a1 (- (* -1 (/ (pow a2 2) (pow a1 2))) 1)))
(* -1 (* a1 (- (* -1 (/ (pow a2 2) (pow a1 2))) 1)))
(* -1 (* a1 (- (* -1 (/ (pow a2 2) (pow a1 2))) 1)))
a1
(+ a1 (/ (pow a2 2) a1))
(+ a1 (/ (pow a2 2) a1))
(+ a1 (/ (pow a2 2) a1))
(/ (pow a2 2) a1)
(* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))
(* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))
(* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))
(/ (pow a2 2) a1)
(* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))
(* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))
(* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))
1
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(/ (pow a2 2) (pow a1 2))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(/ (pow a2 2) (pow a1 2))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(/ (pow a2 2) (pow a1 2))
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
1
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
1
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(/ (pow a2 2) (sqrt 2))
(+ (/ (* a1 (+ a2 (* -1 a2))) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (* a1 (- (* a1 (- (+ (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (* (pow a2 2) (sqrt 2)))) (/ 1 (sqrt 2))) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (+ a2 (* -1 a2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(+ (* a1 (- (* a1 (- (+ (* -1 (* a1 (+ (* -1 (/ (* (+ a2 (* -1 a2)) (- (+ (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (* (pow a2 2) (sqrt 2)))) (/ 1 (sqrt 2))) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (* (pow a2 2) (sqrt 2)))))) (pow a2 2))) (* -1 (/ (+ a2 (* -1 a2)) (* (pow a2 2) (sqrt 2))))))) (+ (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (* (pow a2 2) (sqrt 2)))) (/ 1 (sqrt 2)))) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (+ a2 (* -1 a2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))) a1)) (/ 1 (sqrt 2))))
(* (pow a1 2) (- (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ a2 (* a1 (sqrt 2)))) (+ (* -1 (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (pow a1 2))) (/ a2 (* a1 (sqrt 2)))))))
(* (pow a1 2) (- (+ (* -1 (/ (+ (* (+ a2 (* -1 a2)) (- (/ (pow a2 2) (sqrt 2)) (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))))))) (* (pow a2 2) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))))) (pow a1 3))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (+ (* -1 (/ a2 (* a1 (sqrt 2)))) (+ (* -1 (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (pow a1 2))) (/ a2 (* a1 (sqrt 2)))))))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))) a1)) (/ 1 (sqrt 2))))
(* (pow a1 2) (+ (* -1 (/ (- (+ (* -1 (/ a2 (sqrt 2))) (+ (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (* a1 (sqrt 2)))) (/ a2 (sqrt 2)))) (+ (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) a1) (/ (pow a2 2) (* a1 (sqrt 2))))) a1)) (/ 1 (sqrt 2))))
(* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (+ (* -1 (/ (+ (* -1 (- (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (sqrt 2))) (+ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (/ (pow a2 2) (sqrt 2))))) (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (- (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (sqrt 2))) (+ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (/ (pow a2 2) (sqrt 2)))))) (* (pow a2 2) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))))) a1))) a1)) (/ a2 (sqrt 2)))) a1)) (/ 1 (sqrt 2))))
(/ (pow a1 2) (sqrt 2))
(+ (* -1 (* a2 (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))
(+ (* a2 (- (* a2 (- (/ 1 (sqrt 2)) (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (pow a1 2))))) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))
(+ (* a2 (- (* a2 (- (+ (* -1 (/ (* a2 (* (+ a1 (* -1 a1)) (- (/ 1 (sqrt 2)) (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (pow a1 2)))))) (pow a1 2))) (/ 1 (sqrt 2))) (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (pow a1 2))))) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (* -1 (/ a1 (* a2 (sqrt 2)))) (+ (/ 1 (sqrt 2)) (/ a1 (* a2 (sqrt 2))))))
(* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (* (pow a2 2) (sqrt 2)))) (/ 1 (sqrt 2))) (+ (* -1 (/ (+ a1 (* -1 a1)) (* a2 (sqrt 2)))) (+ (* -1 (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (* (pow a2 2) (sqrt 2))))))))
(* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (* (+ a1 (* -1 a1)) (- (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (+ (* -1 (/ (pow a1 2) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2))))))) (* -1 (/ (* (pow a1 2) (+ a1 (* -1 a1))) (sqrt 2)))) (pow a2 3))) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (* (pow a2 2) (sqrt 2)))) (/ 1 (sqrt 2)))) (+ (* -1 (/ (+ a1 (* -1 a1)) (* a2 (sqrt 2)))) (+ (* -1 (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (* (pow a2 2) (sqrt 2))))))))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (* -1 (/ (+ a1 (* -1 a1)) (* a2 (sqrt 2)))) (/ 1 (sqrt 2))))
(* (pow a2 2) (+ (* -1 (/ (- (* -1 (/ (- (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (+ (* -1 (/ (pow a1 2) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2))))) a2)) (* -1 (/ (+ a1 (* -1 a1)) (sqrt 2)))) a2)) (/ 1 (sqrt 2))))
(* (pow a2 2) (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a1 (* -1 a1)) (- (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (+ (* -1 (/ (pow a1 2) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2)))))) a2)) (+ (* -1 (/ (* (pow a1 2) (+ a1 (* -1 a1))) (* a2 (sqrt 2)))) (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))))) (+ (* -1 (/ (pow a1 2) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2))))) a2)) (* -1 (/ (+ a1 (* -1 a1)) (sqrt 2)))) a2)) (/ 1 (sqrt 2))))
(pow a2 2)
(+ (* a1 (+ a2 (* -1 a2))) (pow a2 2))
(+ (* a1 (- (* a1 (- (+ 1 (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (pow a2 2)))) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a2 2))))) (* -1 (+ a2 (* -1 a2))))) (pow a2 2))
(+ (* a1 (- (* a1 (- (+ 1 (+ (* -1 (* a1 (+ (* -1 (/ (* (+ a2 (* -1 a2)) (- (+ 1 (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (pow a2 2)))) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a2 2))))) (pow a2 2))) (* -1 (/ (+ a2 (* -1 a2)) (pow a2 2)))))) (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (pow a2 2))))) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a2 2))))) (* -1 (+ a2 (* -1 a2))))) (pow a2 2))
(pow a1 2)
(* (pow a1 2) (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))))
(* (pow a1 2) (- (+ 1 (/ (pow a2 2) (pow a1 2))) (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a1 2))) (/ a2 a1)))))
(* (pow a1 2) (- (+ 1 (+ (* -1 (/ (+ (* (+ a2 (* -1 a2)) (- (pow a2 2) (* -1 (pow (+ a2 (* -1 a2)) 2)))) (* (pow a2 2) (+ a2 (* -1 a2)))) (pow a1 3))) (/ (pow a2 2) (pow a1 2)))) (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a1 2))) (/ a2 a1)))))
(pow a1 2)
(* (pow a1 2) (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))))
(* (pow a1 2) (+ 1 (* -1 (/ (- (+ a2 (+ (* -1 a2) (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) a1)))) (+ (/ (pow a2 2) a1) (/ (pow (+ a2 (* -1 a2)) 2) a1))) a1))))
(* (pow a1 2) (+ 1 (* -1 (/ (+ a2 (+ (* -1 a2) (* -1 (/ (+ (* -1 (- (* -1 (+ (* -1 (pow a2 2)) (pow a2 2))) (+ (pow a2 2) (pow (+ a2 (* -1 a2)) 2)))) (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (- (* -1 (+ (* -1 (pow a2 2)) (pow a2 2))) (+ (pow a2 2) (pow (+ a2 (* -1 a2)) 2))))) (* (pow a2 2) (+ a2 (* -1 a2)))) a1))) a1)))) a1))))
(pow a1 2)
(+ (* -1 (* a2 (+ a1 (* -1 a1)))) (pow a1 2))
(+ (* a2 (- (* a2 (- 1 (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (pow a1 2))))) (+ a1 (* -1 a1)))) (pow a1 2))
(+ (* a2 (- (* a2 (- (+ 1 (* -1 (/ (* a2 (* (+ a1 (* -1 a1)) (- 1 (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (pow a1 2)))))) (pow a1 2)))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (pow a1 2))))) (+ a1 (* -1 a1)))) (pow a1 2))
(pow a2 2)
(* (pow a2 2) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2))))
(* (pow a2 2) (- (+ 1 (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (pow a2 2)))) (+ (* -1 (/ (+ a1 (* -1 a1)) a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (pow a2 2)))))))
(* (pow a2 2) (- (+ 1 (+ (* -1 (/ (+ (* -1 (* (+ a1 (* -1 a1)) (- (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (+ (* -1 (pow a1 2)) (* -1 (pow (+ a1 (* -1 a1)) 2)))))) (* -1 (* (pow a1 2) (+ a1 (* -1 a1))))) (pow a2 3))) (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (pow a2 2))))) (+ (* -1 (/ (+ a1 (* -1 a1)) a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (pow a2 2)))))))
(pow a2 2)
(* (pow a2 2) (+ 1 (* -1 (/ (+ a1 (* -1 a1)) a2))))
(* (pow a2 2) (+ 1 (* -1 (/ (- (* -1 (/ (- (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (+ (* -1 (pow a1 2)) (* -1 (pow (+ a1 (* -1 a1)) 2)))) a2)) (* -1 (+ a1 (* -1 a1)))) a2))))
(* (pow a2 2) (+ 1 (* -1 (/ (- (* -1 (/ (- (+ (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (+ (* -1 (/ (* (+ a1 (* -1 a1)) (- (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (+ (* -1 (pow a1 2)) (* -1 (pow (+ a1 (* -1 a1)) 2))))) a2)) (* -1 (/ (* (pow a1 2) (+ a1 (* -1 a1))) a2)))) (+ (* -1 (pow a1 2)) (* -1 (pow (+ a1 (* -1 a1)) 2)))) a2)) (* -1 (+ a1 (* -1 a1)))) a2))))
(/ -1 (pow a2 2))
(- (* -1 (/ (pow a1 2) (pow a2 4))) (/ 1 (pow a2 2)))
(- (* (pow a1 2) (- (* -1 (/ (pow a1 2) (pow a2 6))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))
(- (* (pow a1 2) (- (* (pow a1 2) (- (* -1 (/ (pow a1 2) (pow a2 8))) (/ 1 (pow a2 6)))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))
(/ 1 (pow a1 2))
(/ (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))) (pow a1 2))
(/ (- (+ 1 (* -1 (/ (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2))) (pow a1 2)))) (+ (* -1 (/ a2 a1)) (/ a2 a1))) (pow a1 2))
(/ (- (+ 1 (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2))))) (* (pow a2 2) (+ a2 (* -1 a2)))) (pow a1 3)))) (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a1 2))) (/ a2 a1))))) (pow a1 2))
(/ 1 (pow a1 2))
(/ (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))) (pow a1 2))
(/ (+ 1 (* -1 (/ (- (+ (* -1 (/ (pow a2 2) a1)) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) a1))) (* -1 (+ a2 (* -1 a2)))) a1))) (pow a1 2))
(/ (+ 1 (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (pow a2 2) (+ a2 (* -1 a2))) a1)) (/ (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2)))) a1)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2)))) a1)) (* -1 (+ a2 (* -1 a2)))) a1))) (pow a1 2))
(/ 1 (pow a1 2))
(+ (/ 1 (pow a1 2)) (/ (pow a2 2) (pow a1 4)))
(+ (* (pow a2 2) (+ (/ 1 (pow a1 4)) (/ (pow a2 2) (pow a1 6)))) (/ 1 (pow a1 2)))
(+ (* (pow a2 2) (+ (* (pow a2 2) (+ (/ 1 (pow a1 6)) (/ (pow a2 2) (pow a1 8)))) (/ 1 (pow a1 4)))) (/ 1 (pow a1 2)))
(/ -1 (pow a2 2))
(/ (- (* -1 (/ (+ a1 (* -1 a1)) a2)) 1) (pow a2 2))
(/ (- (* -1 (/ (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2)) (pow a2 2))) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2)))) (pow a2 2))
(/ (- (* -1 (/ (+ (* (+ a1 (* -1 a1)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) (* (pow a1 2) (+ a1 (* -1 a1)))) (pow a2 3))) (+ 1 (+ (* -1 (/ a1 a2)) (+ (/ a1 a2) (+ (/ (pow a1 2) (pow a2 2)) (/ (pow (+ a1 (* -1 a1)) 2) (pow a2 2))))))) (pow a2 2))
(/ -1 (pow a2 2))
(/ (- (+ (* -1 (/ a1 a2)) (/ a1 a2)) 1) (pow a2 2))
(/ (- (* -1 (/ (- (+ (/ (pow a1 2) a2) (/ (pow (+ a1 (* -1 a1)) 2) a2)) (+ a1 (* -1 a1))) a2)) 1) (pow a2 2))
(/ (- (* -1 (/ (- (* -1 (/ (- (+ (/ (* (+ a1 (* -1 a1)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) a2) (/ (* (pow a1 2) (+ a1 (* -1 a1))) a2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) a2)) (+ a1 (* -1 a1))) a2)) 1) (pow a2 2))
(/ 1 a2)
(+ (* -1 (/ a1 (pow a2 2))) (/ 1 a2))
(+ (* a1 (- (/ a1 (pow a2 3)) (/ 1 (pow a2 2)))) (/ 1 a2))
(+ (* a1 (- (* a1 (+ (* -1 (/ a1 (pow a2 4))) (/ 1 (pow a2 3)))) (/ 1 (pow a2 2)))) (/ 1 a2))
(/ 1 a1)
(/ (+ 1 (* -1 (/ a2 a1))) a1)
(/ (- (+ 1 (/ (pow a2 2) (pow a1 2))) (/ a2 a1)) a1)
(/ (- (+ 1 (* -1 (/ (pow a2 3) (pow a1 3)))) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (/ a2 a1))) a1)
(/ 1 a1)
(* -1 (/ (- (/ a2 a1) 1) a1))
(* -1 (/ (- (* -1 (/ (- (/ (pow a2 2) a1) a2) a1)) 1) a1))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow a2 3) a1) (pow a2 2)) a1)) a2) a1)) 1) a1))
(/ 1 a1)
(+ (* -1 (/ a2 (pow a1 2))) (/ 1 a1))
(+ (* a2 (- (/ a2 (pow a1 3)) (/ 1 (pow a1 2)))) (/ 1 a1))
(+ (* a2 (- (* a2 (+ (* -1 (/ a2 (pow a1 4))) (/ 1 (pow a1 3)))) (/ 1 (pow a1 2)))) (/ 1 a1))
(/ 1 a2)
(/ (+ 1 (* -1 (/ a1 a2))) a2)
(/ (- (+ 1 (/ (pow a1 2) (pow a2 2))) (/ a1 a2)) a2)
(/ (- (+ 1 (* -1 (/ (pow a1 3) (pow a2 3)))) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (/ a1 a2))) a2)
(/ 1 a2)
(* -1 (/ (- (/ a1 a2) 1) a2))
(* -1 (/ (- (* -1 (/ (- (/ (pow a1 2) a2) a1) a2)) 1) a2))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow a1 3) a2) (pow a1 2)) a2)) a1) a2)) 1) a2))
(/ (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))
(/ 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) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (pow a2 2) a1)
(/ (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 a2 2) (pow a1 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 a2 2) (pow a1 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 a2 2) (pow a1 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 a2 2) (pow a1 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))
(* -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) (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 (*.f64 a2 a2) (/.f64 (*.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 #s(literal -1/2 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (*.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 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (+.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 a2 a2)) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.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) (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
#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 th th) (+.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #s(literal -1/2 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 (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))) #s(literal -1/2 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)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(pow 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) (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 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 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 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 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 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 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 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 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 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 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 a1 a1) (sqrt.f64 #s(literal 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 a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (+ (pow a1 2) (pow a2 2)) a1)
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) a1)
(/ (+ (pow a1 2) (pow a2 2)) a1)
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) a1)
(/ (+ (pow a1 2) (pow a2 2)) a1)
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) a1)
a1
(* a1 (+ 1 (/ (pow a2 2) (pow a1 2))))
(*.f64 a1 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)))
(* a1 (+ 1 (/ (pow a2 2) (pow a1 2))))
(*.f64 a1 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)))
(* a1 (+ 1 (/ (pow a2 2) (pow a1 2))))
(*.f64 a1 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)))
a1
(* -1 (* a1 (- (* -1 (/ (pow a2 2) (pow a1 2))) 1)))
(*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) a1))
(* -1 (* a1 (- (* -1 (/ (pow a2 2) (pow a1 2))) 1)))
(*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) a1))
(* -1 (* a1 (- (* -1 (/ (pow a2 2) (pow a1 2))) 1)))
(*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) a1))
a1
(+ a1 (/ (pow a2 2) a1))
(+.f64 a1 (/.f64 (*.f64 a2 a2) a1))
(+ a1 (/ (pow a2 2) a1))
(+.f64 a1 (/.f64 (*.f64 a2 a2) a1))
(+ a1 (/ (pow a2 2) a1))
(+.f64 a1 (/.f64 (*.f64 a2 a2) a1))
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) a1) (/.f64 a1 (*.f64 a2 a2))))
(* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) a1) (/.f64 a1 (*.f64 a2 a2))))
(* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) a1) (/.f64 a1 (*.f64 a2 a2))))
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) a1) (/.f64 a1 (*.f64 a2 a2))))
(* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) a1) (/.f64 a1 (*.f64 a2 a2))))
(* (pow a2 2) (+ (/ 1 a1) (/ a1 (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) a1) (/.f64 a1 (*.f64 a2 a2))))
1
#s(literal 1 binary64)
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))
(* (pow a2 2) (+ (/ 1 (pow a1 2)) (/ 1 (pow a2 2))))
(+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 a1 a1))
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 a1 a1))
(/ (+ (pow a1 2) (pow a2 2)) (pow a1 2))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 a1 a1))
1
#s(literal 1 binary64)
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))
1
#s(literal 1 binary64)
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))
(+ 1 (/ (pow a2 2) (pow a1 2)))
(+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* a1 (+ a2 (* -1 a2))) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64))
(+ (* a1 (- (* a1 (- (+ (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (* (pow a2 2) (sqrt 2)))) (/ 1 (sqrt 2))) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (+ a2 (* -1 a2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64)))
(+ (* a1 (- (* a1 (- (+ (* -1 (* a1 (+ (* -1 (/ (* (+ a2 (* -1 a2)) (- (+ (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (* (pow a2 2) (sqrt 2)))) (/ 1 (sqrt 2))) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (* (pow a2 2) (sqrt 2)))))) (pow a2 2))) (* -1 (/ (+ a2 (* -1 a2)) (* (pow a2 2) (sqrt 2))))))) (+ (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (* (pow a2 2) (sqrt 2)))) (/ 1 (sqrt 2)))) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (* (pow a2 2) (sqrt 2)))))) (* -1 (/ (+ a2 (* -1 a2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 0 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64)) a2))))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))) a1)) (/ 1 (sqrt 2))))
(+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64))
(* (pow a1 2) (- (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ a2 (* a1 (sqrt 2)))) (+ (* -1 (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (pow a1 2))) (/ a2 (* a1 (sqrt 2)))))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (-.f64 (+.f64 (/.f64 (/.f64 a2 a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64)) (/.f64 (/.f64 a2 a1) (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a1 2) (- (+ (* -1 (/ (+ (* (+ a2 (* -1 a2)) (- (/ (pow a2 2) (sqrt 2)) (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))))))) (* (pow a2 2) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))))) (pow a1 3))) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (+ (* -1 (/ a2 (* a1 (sqrt 2)))) (+ (* -1 (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (pow a1 2))) (/ a2 (* a1 (sqrt 2)))))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (-.f64 (+.f64 (/.f64 (/.f64 a2 a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64)) (/.f64 (/.f64 a2 a1) (sqrt.f64 #s(literal 2 binary64)))))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))) a1)) (/ 1 (sqrt 2))))
(+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64))
(* (pow a1 2) (+ (* -1 (/ (- (+ (* -1 (/ a2 (sqrt 2))) (+ (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (* a1 (sqrt 2)))) (/ a2 (sqrt 2)))) (+ (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) a1) (/ (pow a2 2) (* a1 (sqrt 2))))) a1)) (/ 1 (sqrt 2))))
(*.f64 (*.f64 a1 a1) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) a1))))
(* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (+ (* -1 (/ (+ (* -1 (- (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (sqrt 2))) (+ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (/ (pow a2 2) (sqrt 2))))) (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (- (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (sqrt 2))) (+ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (/ (pow a2 2) (sqrt 2)))))) (* (pow a2 2) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))))) a1))) a1)) (/ a2 (sqrt 2)))) a1)) (/ 1 (sqrt 2))))
(*.f64 (*.f64 a1 a1) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (/.f64 (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 0 binary64)) a1) (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) a1)) #s(literal 0 binary64)) a1)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (* a2 (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64))
(+ (* a2 (- (* a2 (- (/ 1 (sqrt 2)) (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (pow a1 2))))) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64)))
(+ (* a2 (- (* a2 (- (+ (* -1 (/ (* a2 (* (+ a1 (* -1 a1)) (- (/ 1 (sqrt 2)) (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (pow a1 2)))))) (pow a1 2))) (/ 1 (sqrt 2))) (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (pow a1 2))))) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (+.f64 (*.f64 #s(literal 0 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64)) a1)) (*.f64 a2 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64))))) #s(literal 0 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (* -1 (/ a1 (* a2 (sqrt 2)))) (+ (/ 1 (sqrt 2)) (/ a1 (* a2 (sqrt 2))))))
(*.f64 (*.f64 a2 a2) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a1 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (* (pow a2 2) (sqrt 2)))) (/ 1 (sqrt 2))) (+ (* -1 (/ (+ a1 (* -1 a1)) (* a2 (sqrt 2)))) (+ (* -1 (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (* (pow a2 2) (sqrt 2))))))))
(*.f64 (*.f64 a2 a2) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (* (+ a1 (* -1 a1)) (- (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (+ (* -1 (/ (pow a1 2) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2))))))) (* -1 (/ (* (pow a1 2) (+ a1 (* -1 a1))) (sqrt 2)))) (pow a2 3))) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (* (pow a2 2) (sqrt 2)))) (/ 1 (sqrt 2)))) (+ (* -1 (/ (+ a1 (* -1 a1)) (* a2 (sqrt 2)))) (+ (* -1 (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (* (pow a2 2) (sqrt 2))))))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 0 binary64)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (* -1 (/ (+ a1 (* -1 a1)) (* a2 (sqrt 2)))) (/ 1 (sqrt 2))))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64))
(* (pow a2 2) (+ (* -1 (/ (- (* -1 (/ (- (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (+ (* -1 (/ (pow a1 2) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2))))) a2)) (* -1 (/ (+ a1 (* -1 a1)) (sqrt 2)))) a2)) (/ 1 (sqrt 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) a2))) a2)))
(* (pow a2 2) (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a1 (* -1 a1)) (- (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (+ (* -1 (/ (pow a1 2) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2)))))) a2)) (+ (* -1 (/ (* (pow a1 2) (+ a1 (* -1 a1))) (* a2 (sqrt 2)))) (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))))) (+ (* -1 (/ (pow a1 2) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2))))) a2)) (* -1 (/ (+ a1 (* -1 a1)) (sqrt 2)))) a2)) (/ 1 (sqrt 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) a2))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) a2)) a2)))
(pow a2 2)
(*.f64 a2 a2)
(+ (* a1 (+ a2 (* -1 a2))) (pow a2 2))
(*.f64 a2 a2)
(+ (* a1 (- (* a1 (- (+ 1 (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (pow a2 2)))) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a2 2))))) (* -1 (+ a2 (* -1 a2))))) (pow a2 2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+ (* a1 (- (* a1 (- (+ 1 (+ (* -1 (* a1 (+ (* -1 (/ (* (+ a2 (* -1 a2)) (- (+ 1 (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (pow a2 2)))) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a2 2))))) (pow a2 2))) (* -1 (/ (+ a2 (* -1 a2)) (pow a2 2)))))) (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) (pow a2 2))))) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a2 2))))) (* -1 (+ a2 (* -1 a2))))) (pow a2 2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))))
(*.f64 a1 a1)
(* (pow a1 2) (- (+ 1 (/ (pow a2 2) (pow a1 2))) (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a1 2))) (/ a2 a1)))))
(*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)))
(* (pow a1 2) (- (+ 1 (+ (* -1 (/ (+ (* (+ a2 (* -1 a2)) (- (pow a2 2) (* -1 (pow (+ a2 (* -1 a2)) 2)))) (* (pow a2 2) (+ a2 (* -1 a2)))) (pow a1 3))) (/ (pow a2 2) (pow a1 2)))) (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a1 2))) (/ a2 a1)))))
(*.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 (* -1 (/ (+ a2 (* -1 a2)) a1))))
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (* -1 (/ (- (+ a2 (+ (* -1 a2) (* -1 (/ (+ (* -1 (pow a2 2)) (pow a2 2)) a1)))) (+ (/ (pow a2 2) a1) (/ (pow (+ a2 (* -1 a2)) 2) a1))) a1))))
(*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)))
(* (pow a1 2) (+ 1 (* -1 (/ (+ a2 (+ (* -1 a2) (* -1 (/ (+ (* -1 (- (* -1 (+ (* -1 (pow a2 2)) (pow a2 2))) (+ (pow a2 2) (pow (+ a2 (* -1 a2)) 2)))) (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (- (* -1 (+ (* -1 (pow a2 2)) (pow a2 2))) (+ (pow a2 2) (pow (+ a2 (* -1 a2)) 2))))) (* (pow a2 2) (+ a2 (* -1 a2)))) a1))) a1)))) a1))))
(*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)))
(pow a1 2)
(*.f64 a1 a1)
(+ (* -1 (* a2 (+ a1 (* -1 a1)))) (pow a1 2))
(*.f64 a1 a1)
(+ (* a2 (- (* a2 (- 1 (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (pow a1 2))))) (+ a1 (* -1 a1)))) (pow a1 2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+ (* a2 (- (* a2 (- (+ 1 (* -1 (/ (* a2 (* (+ a1 (* -1 a1)) (- 1 (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (pow a1 2)))))) (pow a1 2)))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (pow a1 2))))) (+ a1 (* -1 a1)))) (pow a1 2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2))))
(*.f64 a2 a2)
(* (pow a2 2) (- (+ 1 (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (pow a2 2)))) (+ (* -1 (/ (+ a1 (* -1 a1)) a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (* -1 (/ (pow (+ a1 (* -1 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 (+ (* -1 (/ (+ (* -1 (* (+ a1 (* -1 a1)) (- (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (+ (* -1 (pow a1 2)) (* -1 (pow (+ a1 (* -1 a1)) 2)))))) (* -1 (* (pow a1 2) (+ a1 (* -1 a1))))) (pow a2 3))) (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (pow a2 2))))) (+ (* -1 (/ (+ a1 (* -1 a1)) a2)) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (* -1 (/ (pow (+ a1 (* -1 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 (* -1 (/ (+ a1 (* -1 a1)) a2))))
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (* -1 (/ (- (* -1 (/ (- (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (+ (* -1 (pow a1 2)) (* -1 (pow (+ a1 (* -1 a1)) 2)))) a2)) (* -1 (+ a1 (* -1 a1)))) a2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(* (pow a2 2) (+ 1 (* -1 (/ (- (* -1 (/ (- (+ (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (+ (* -1 (/ (* (+ a1 (* -1 a1)) (- (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (+ (* -1 (pow a1 2)) (* -1 (pow (+ a1 (* -1 a1)) 2))))) a2)) (* -1 (/ (* (pow a1 2) (+ a1 (* -1 a1))) a2)))) (+ (* -1 (pow a1 2)) (* -1 (pow (+ a1 (* -1 a1)) 2)))) a2)) (* -1 (+ a1 (* -1 a1)))) a2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/ -1 (pow a2 2))
(/.f64 #s(literal -1 binary64) (*.f64 a2 a2))
(- (* -1 (/ (pow a1 2) (pow a2 4))) (/ 1 (pow a2 2)))
(+.f64 (neg.f64 (*.f64 a1 (/.f64 a1 (pow.f64 a2 #s(literal 4 binary64))))) (/.f64 #s(literal -1 binary64) (*.f64 a2 a2)))
(- (* (pow a1 2) (- (* -1 (/ (pow a1 2) (pow a2 6))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))
(+.f64 (*.f64 (*.f64 a1 a1) (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 #s(literal -1 binary64) (pow.f64 a2 #s(literal 4 binary64))))) (/.f64 #s(literal -1 binary64) (*.f64 a2 a2)))
(- (* (pow a1 2) (- (* (pow a1 2) (- (* -1 (/ (pow a1 2) (pow a2 8))) (/ 1 (pow a2 6)))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))
(+.f64 (*.f64 (*.f64 a1 a1) (+.f64 (*.f64 (*.f64 a1 a1) (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (pow.f64 a2 #s(literal 8 binary64))) (/.f64 #s(literal -1 binary64) (pow.f64 a2 #s(literal 6 binary64))))) (/.f64 #s(literal -1 binary64) (pow.f64 a2 #s(literal 4 binary64))))) (/.f64 #s(literal -1 binary64) (*.f64 a2 a2)))
(/ 1 (pow a1 2))
(/.f64 #s(literal 1 binary64) (*.f64 a1 a1))
(/ (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))) (pow a1 2))
(/.f64 #s(literal 1 binary64) (*.f64 a1 a1))
(/ (- (+ 1 (* -1 (/ (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2))) (pow a1 2)))) (+ (* -1 (/ a2 a1)) (/ a2 a1))) (pow a1 2))
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (*.f64 a1 a1))
(/ (- (+ 1 (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2))))) (* (pow a2 2) (+ a2 (* -1 a2)))) (pow a1 3)))) (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a1 2))) (/ a2 a1))))) (pow a1 2))
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (*.f64 a1 a1))
(/ 1 (pow a1 2))
(/.f64 #s(literal 1 binary64) (*.f64 a1 a1))
(/ (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))) (pow a1 2))
(/.f64 #s(literal 1 binary64) (*.f64 a1 a1))
(/ (+ 1 (* -1 (/ (- (+ (* -1 (/ (pow a2 2) a1)) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) a1))) (* -1 (+ a2 (* -1 a2)))) a1))) (pow a1 2))
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (*.f64 a1 a1))
(/ (+ 1 (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (pow a2 2) (+ a2 (* -1 a2))) a1)) (/ (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2)))) a1)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2)))) a1)) (* -1 (+ a2 (* -1 a2)))) a1))) (pow a1 2))
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) (*.f64 a1 a1))
(/ 1 (pow a1 2))
(/.f64 #s(literal 1 binary64) (*.f64 a1 a1))
(+ (/ 1 (pow a1 2)) (/ (pow a2 2) (pow a1 4)))
(+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (/.f64 (*.f64 a2 a2) (pow.f64 a1 #s(literal 4 binary64))))
(+ (* (pow a2 2) (+ (/ 1 (pow a1 4)) (/ (pow a2 2) (pow a1 6)))) (/ 1 (pow a1 2)))
(+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 a1 #s(literal 6 binary64))))))
(+ (* (pow a2 2) (+ (* (pow a2 2) (+ (/ 1 (pow a1 6)) (/ (pow a2 2) (pow a1 8)))) (/ 1 (pow a1 4)))) (/ 1 (pow a1 2)))
(+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a1 #s(literal 6 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 a1 #s(literal 8 binary64))))))))
(/ -1 (pow a2 2))
(/.f64 #s(literal -1 binary64) (*.f64 a2 a2))
(/ (- (* -1 (/ (+ a1 (* -1 a1)) a2)) 1) (pow a2 2))
(/.f64 #s(literal -1 binary64) (*.f64 a2 a2))
(/ (- (* -1 (/ (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2)) (pow a2 2))) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2)))) (pow a2 2))
(/.f64 (-.f64 #s(literal -1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 a2 a2))
(/ (- (* -1 (/ (+ (* (+ a1 (* -1 a1)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) (* (pow a1 2) (+ a1 (* -1 a1)))) (pow a2 3))) (+ 1 (+ (* -1 (/ a1 a2)) (+ (/ a1 a2) (+ (/ (pow a1 2) (pow a2 2)) (/ (pow (+ a1 (* -1 a1)) 2) (pow a2 2))))))) (pow a2 2))
(/.f64 (-.f64 #s(literal -1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 a2 a2))
(/ -1 (pow a2 2))
(/.f64 #s(literal -1 binary64) (*.f64 a2 a2))
(/ (- (+ (* -1 (/ a1 a2)) (/ a1 a2)) 1) (pow a2 2))
(/.f64 #s(literal -1 binary64) (*.f64 a2 a2))
(/ (- (* -1 (/ (- (+ (/ (pow a1 2) a2) (/ (pow (+ a1 (* -1 a1)) 2) a2)) (+ a1 (* -1 a1))) a2)) 1) (pow a2 2))
(/.f64 (-.f64 #s(literal -1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 a2 a2))
(/ (- (* -1 (/ (- (* -1 (/ (- (+ (/ (* (+ a1 (* -1 a1)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) a2) (/ (* (pow a1 2) (+ a1 (* -1 a1))) a2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) a2)) (+ a1 (* -1 a1))) a2)) 1) (pow a2 2))
(/.f64 (-.f64 #s(literal -1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 a2 a2))
(/ 1 a2)
(/.f64 #s(literal 1 binary64) a2)
(+ (* -1 (/ a1 (pow a2 2))) (/ 1 a2))
(-.f64 (/.f64 #s(literal 1 binary64) a2) (/.f64 a1 (*.f64 a2 a2)))
(+ (* a1 (- (/ a1 (pow a2 3)) (/ 1 (pow a2 2)))) (/ 1 a2))
(+.f64 (/.f64 #s(literal 1 binary64) a2) (*.f64 a1 (+.f64 (/.f64 a1 (*.f64 a2 (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (*.f64 a2 a2)))))
(+ (* a1 (- (* a1 (+ (* -1 (/ a1 (pow a2 4))) (/ 1 (pow a2 3)))) (/ 1 (pow a2 2)))) (/ 1 a2))
(+.f64 (/.f64 #s(literal 1 binary64) a2) (*.f64 a1 (+.f64 (*.f64 a1 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 (*.f64 a2 a2))) (/.f64 a1 (pow.f64 a2 #s(literal 4 binary64))))) (/.f64 #s(literal -1 binary64) (*.f64 a2 a2)))))
(/ 1 a1)
(/.f64 #s(literal 1 binary64) a1)
(/ (+ 1 (* -1 (/ a2 a1))) a1)
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 a2 a1)) a1)
(/ (- (+ 1 (/ (pow a2 2) (pow a1 2))) (/ a2 a1)) a1)
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 a2 a2) a1) a2) a1)) a1)
(/ (- (+ 1 (* -1 (/ (pow a2 3) (pow a1 3)))) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (/ a2 a1))) a1)
(/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 a1)))) (/.f64 (-.f64 (/.f64 (*.f64 a2 a2) a1) a2) a1)) a1)
(/ 1 a1)
(/.f64 #s(literal 1 binary64) a1)
(* -1 (/ (- (/ a2 a1) 1) a1))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 a2 a1)) a1)
(* -1 (/ (- (* -1 (/ (- (/ (pow a2 2) a1) a2) a1)) 1) a1))
(/.f64 (+.f64 (/.f64 (-.f64 (/.f64 (*.f64 a2 a2) a1) a2) (-.f64 #s(literal 0 binary64) a1)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) a1))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow a2 3) a1) (pow a2 2)) a1)) a2) a1)) 1) a1))
(/.f64 (+.f64 (/.f64 (-.f64 (/.f64 (-.f64 (/.f64 (*.f64 a2 (*.f64 a2 a2)) a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) a1)) a2) (-.f64 #s(literal 0 binary64) a1)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) a1))
(/ 1 a1)
(/.f64 #s(literal 1 binary64) a1)
(+ (* -1 (/ a2 (pow a1 2))) (/ 1 a1))
(-.f64 (/.f64 #s(literal 1 binary64) a1) (/.f64 a2 (*.f64 a1 a1)))
(+ (* a2 (- (/ a2 (pow a1 3)) (/ 1 (pow a1 2)))) (/ 1 a1))
(+.f64 (/.f64 #s(literal 1 binary64) a1) (*.f64 a2 (+.f64 (/.f64 a2 (*.f64 a1 (*.f64 a1 a1))) (/.f64 #s(literal -1 binary64) (*.f64 a1 a1)))))
(+ (* a2 (- (* a2 (+ (* -1 (/ a2 (pow a1 4))) (/ 1 (pow a1 3)))) (/ 1 (pow a1 2)))) (/ 1 a1))
(+.f64 (/.f64 #s(literal 1 binary64) a1) (*.f64 a2 (+.f64 (*.f64 a2 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 (*.f64 a1 a1))) (/.f64 a2 (pow.f64 a1 #s(literal 4 binary64))))) (/.f64 #s(literal -1 binary64) (*.f64 a1 a1)))))
(/ 1 a2)
(/.f64 #s(literal 1 binary64) a2)
(/ (+ 1 (* -1 (/ a1 a2))) a2)
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 a1 a2)) a2)
(/ (- (+ 1 (/ (pow a1 2) (pow a2 2))) (/ a1 a2)) a2)
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 a1 a1) a2) a1) a2)) a2)
(/ (- (+ 1 (* -1 (/ (pow a1 3) (pow a2 3)))) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (/ a1 a2))) a2)
(/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (-.f64 (/.f64 (*.f64 a1 a1) a2) a1) a2)) a2)
(/ 1 a2)
(/.f64 #s(literal 1 binary64) a2)
(* -1 (/ (- (/ a1 a2) 1) a2))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 a1 a2)) a2)
(* -1 (/ (- (* -1 (/ (- (/ (pow a1 2) a2) a1) a2)) 1) a2))
(/.f64 (+.f64 (/.f64 (-.f64 (/.f64 (*.f64 a1 a1) a2) a1) (-.f64 #s(literal 0 binary64) a2)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) a2))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow a1 3) a2) (pow a1 2)) a2)) a1) a2)) 1) a2))
(/.f64 (+.f64 (/.f64 (-.f64 (/.f64 (-.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) a2) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) a2)) a1) (-.f64 #s(literal 0 binary64) a2)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) a2))
(/ (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 (*.f64 a2 a2) (/.f64 (*.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 #s(literal -1/2 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (*.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 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (+.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 a2 a2)) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.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) (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 (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 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* (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 th th) (+.f64 (/.f64 (*.f64 (*.f64 th th) #s(literal -1/720 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/24 binary64) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/ (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) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) a1)
(/.f64 (*.f64 a2 a2) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(/ (pow a2 2) (pow a1 2))
(/.f64 (/.f64 (*.f64 a2 a2) a1) a1)
(* -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 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) a1) a1)
(* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) a1) a1)
(* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) a1) a1)
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) a1) a1)
(* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) a1) a1)
(* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) 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)))

eval132.0ms (1.3%)

Compiler

Compiled 29596 to 2998 computations (89.9% saved)

prune149.0ms (1.4%)

Pruning

42 alts after pruning (37 fresh and 5 done)

PrunedKeptTotal
New1121231144
Fresh101424
Picked235
Done022
Total1133421175
Accuracy
100.0%
Counts
1175 → 42
Alt Table
Click to see full alt table
StatusAccuracyProgram
5.5%
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64)))
13.5%
(/.f64 (/.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))))) (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))
68.9%
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
7.8%
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.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 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
60.1%
(/.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)))))
✓99.6%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
57.3%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 (*.f64 (*.f64 th th) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
✓68.9%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
▶10.2%
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.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 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))) (sqrt.f64 #s(literal 2 binary64)))
▶17.8%
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
10.1%
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.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 (*.f64 (*.f64 a1 a1) (*.f64 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))))))) (sqrt.f64 #s(literal 2 binary64)))
14.2%
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) a1) a1))) (sqrt.f64 #s(literal 2 binary64)))
1.6%
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
10.1%
(/.f64 (*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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))))) (sqrt.f64 #s(literal 2 binary64)))
16.2%
(/.f64 (*.f64 (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
53.7%
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 a1 a2))
15.9%
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 a2 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
30.6%
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))
▶59.8%
(/.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.2%
(/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
44.1%
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))) (sqrt.f64 #s(literal 2 binary64)))
99.2%
(/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
68.6%
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
62.9%
(/.f64 (*.f64 a1 (/.f64 (*.f64 a2 a2) a1)) (sqrt.f64 #s(literal 2 binary64)))
58.3%
(/.f64 (*.f64 a1 (*.f64 a1 (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))) (sqrt.f64 #s(literal 2 binary64)))
58.6%
(/.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 a2 a1) a2) a1)))) (sqrt.f64 #s(literal 2 binary64)))
✓11.7%
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
99.2%
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) a2)))
11.7%
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
68.9%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
68.8%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
99.2%
(*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2)
✓99.1%
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
99.2%
(*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (cos.f64 th))
▶11.7%
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
53.6%
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
59.8%
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
99.1%
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
37.9%
(*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
✓99.2%
(*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
99.1%
(*.f64 (cos.f64 th) (*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2) a2))
68.6%
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
Compiler

Compiled 2068 to 1091 computations (47.2% saved)

simplify184.0ms (1.8%)

Algorithm
1×egg-herbie
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓cost-diff128
(/.f64 #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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))
✓cost-diff128
(*.f64 (+.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 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))
✓cost-diff256
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.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 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))))
✓cost-diff256
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.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 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))) (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(/.f64 #s(literal 1 binary64) (+.f64 a1 a2))
✓cost-diff0
(/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2))
✓cost-diff128
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
✓cost-diff128
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
✓cost-diff0
(*.f64 a2 a2)
✓cost-diff0
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
✓cost-diff0
(/.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)))
✓cost-diff0
(sqrt.f64 #s(literal 2 binary64))
✓cost-diff0
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
✓cost-diff0
(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)))
Rules
4198×*-lowering-*.f32
4198×*-lowering-*.f64
1464×/-lowering-/.f32
1464×/-lowering-/.f64
1344×sum4-define
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
042423
1135364
2449363
31913363
47517363
08255363
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(/ (* (* a2 a2) (cos th)) (sqrt 2))
(* (* a2 a2) (cos th))
(* a2 a2)
a2
(cos th)
th
(sqrt 2)
2
(* (/ a1 (sqrt 2)) a1)
(/ a1 (sqrt 2))
a1
(sqrt 2)
2
(/ (* (* a2 a2) (+ 1 (* -1/2 (* th th)))) (sqrt 2))
(* (* a2 a2) (+ 1 (* -1/2 (* th th))))
(* a2 a2)
a2
(+ 1 (* -1/2 (* th th)))
1
(* -1/2 (* th th))
-1/2
(* th th)
th
(sqrt 2)
2
(/ (* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (- 0 (* a2 a2)))) (sqrt 2))
(* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (- 0 (* a2 a2))))
(/ (/ 1 (+ a1 a2)) (- a1 a2))
(/ 1 (+ a1 a2))
1
(+ a1 a2)
a1
a2
(- a1 a2)
(* (+ (* a1 a1) (* a2 a2)) (- 0 (* a2 a2)))
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
(* a2 a2)
(- 0 (* a2 a2))
0
(sqrt 2)
2
(/ (* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2)))) (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))))))) (sqrt 2))
(* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2)))) (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2))))))))
(/ (/ 1 (+ a1 a2)) (- a1 a2))
(/ 1 (+ a1 a2))
1
(+ a1 a2)
a1
a2
(- a1 a2)
(* (+ (* a1 a1) (* a2 a2)) (/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2)))) (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))))))
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
(* a2 a2)
(/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2)))) (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2))))))
(/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2)))) (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))))
(+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2))))
(* a1 (* a1 (* a1 a1)))
(* a1 (* a1 a1))
(* (* a2 a2) (+ (* a1 a1) (* a2 a2)))
(- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2))))
(* (* a1 a1) (* a1 (* a1 (* a1 a1))))
(* (* a2 (* a2 a2)) (* a2 (* a2 a2)))
(* a2 (* a2 a2))
(sqrt 2)
2
Outputs
(/ (* (* a2 a2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(* (* a2 a2) (cos th))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(* 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)
(* (/ a1 (sqrt 2)) a1)
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
a1
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(/ (* (* a2 a2) (+ 1 (* -1/2 (* th th)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(* (* a2 a2) (+ 1 (* -1/2 (* th th))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))
(* a2 a2)
(*.f64 a2 a2)
a2
(+ 1 (* -1/2 (* th th)))
(+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))
1
#s(literal 1 binary64)
(* -1/2 (* th th))
(*.f64 th (*.f64 th #s(literal -1/2 binary64)))
-1/2
#s(literal -1/2 binary64)
(* th th)
(*.f64 th th)
th
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(/ (* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (- 0 (* a2 a2)))) (sqrt 2))
(/.f64 (/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 a2 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))
(* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (- 0 (* a2 a2))))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))
(/ (/ 1 (+ a1 a2)) (- a1 a2))
(/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2))
(/ 1 (+ a1 a2))
(/.f64 #s(literal 1 binary64) (+.f64 a2 a1))
1
#s(literal 1 binary64)
(+ a1 a2)
(+.f64 a2 a1)
a1
a2
(- a1 a2)
(-.f64 a1 a2)
(* (+ (* a1 a1) (* a2 a2)) (- 0 (* a2 a2)))
(*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(+ (* a1 a1) (* a2 a2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(* a1 a1)
(*.f64 a1 a1)
(* a2 a2)
(*.f64 a2 a2)
(- 0 (* a2 a2))
(-.f64 #s(literal 0 binary64) (*.f64 a2 a2))
0
#s(literal 0 binary64)
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(/ (* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2)))) (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))))))) (sqrt 2))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 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 (*.f64 a2 a2) (*.f64 a2 a2))))))))
(* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2)))) (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2))))))))
(/.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 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 (*.f64 a2 a2) (*.f64 a2 a2))))))) (*.f64 (+.f64 a2 a1) (-.f64 a1 a2)))
(/ (/ 1 (+ a1 a2)) (- a1 a2))
(/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2))
(/ 1 (+ a1 a2))
(/.f64 #s(literal 1 binary64) (+.f64 a2 a1))
1
#s(literal 1 binary64)
(+ a1 a2)
(+.f64 a2 a1)
a1
a2
(- a1 a2)
(-.f64 a1 a2)
(* (+ (* a1 a1) (* a2 a2)) (/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2)))) (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))))))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 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 (*.f64 a2 a2) (*.f64 a2 a2)))))))
(+ (* a1 a1) (* a2 a2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(* a1 a1)
(*.f64 a1 a1)
(* a2 a2)
(*.f64 a2 a2)
(/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2)))) (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2))))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2)))) (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 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 (*.f64 a2 a2) (*.f64 a2 a2))))))
(+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2))))
(+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(* a1 (* a1 (* a1 a1)))
(*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))
(* a1 (* a1 a1))
(*.f64 a1 (*.f64 a1 a1))
(* (* a2 a2) (+ (* a1 a1) (* a2 a2)))
(*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2))))
(-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))
(* (* a1 a1) (* a1 (* a1 (* a1 a1))))
(*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(* (* a2 (* a2 a2)) (* a2 (* a2 a2)))
(*.f64 a2 (*.f64 a2 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))
(* a2 (* a2 a2))
(*.f64 a2 (*.f64 a2 a2))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)

localize246.0ms (2.3%)

Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓accuracy99.7%
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.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 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))) (sqrt.f64 #s(literal 2 binary64)))
✓accuracy85.9%
(-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))
✓accuracy39.2%
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.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 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))))))
✓accuracy19.6%
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))
✓accuracy99.8%
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
✓accuracy99.8%
(/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2))
✓accuracy99.7%
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
✓accuracy39.1%
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy100.0%
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
✓accuracy99.8%
(/.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)))
✓accuracy95.8%
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy99.7%
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
✓accuracy99.4%
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy100.0%
(cos.f64 th)
✓accuracy99.8%
(*.f64 (*.f64 a2 a2) (cos.f64 th))
✓accuracy99.7%
(/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
Results
167.0ms256×0valid
Compiler

Compiled 601 to 43 computations (92.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 69.0ms
ival-mult: 34.0ms (49.2% of total)
ival-div: 15.0ms (21.7% of total)
ival-cos: 8.0ms (11.6% of total)
ival-add: 5.0ms (7.2% of total)
ival-sub: 4.0ms (5.8% of total)
ival-sqrt: 2.0ms (2.9% of total)
const: 1.0ms (1.4% of total)
backward-pass: 0.0ms (0% of total)

series53.0ms (0.5%)

Counts
22 → 432
Calls
Call 1
Inputs
#<alt (/ (* (* a2 a2) (cos th)) (sqrt 2))>
#<alt (* (* a2 a2) (cos th))>
#<alt (* a2 a2)>
#<alt (cos th)>
#<alt (* (/ a1 (sqrt 2)) a1)>
#<alt (/ a1 (sqrt 2))>
#<alt (sqrt 2)>
#<alt (/ (* (* a2 a2) (+ 1 (* -1/2 (* th th)))) (sqrt 2))>
#<alt (* (* a2 a2) (+ 1 (* -1/2 (* th th))))>
#<alt (+ 1 (* -1/2 (* th th)))>
#<alt (/ (* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (- 0 (* a2 a2)))) (sqrt 2))>
#<alt (* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (- 0 (* a2 a2))))>
#<alt (/ (/ 1 (+ a1 a2)) (- a1 a2))>
#<alt (/ 1 (+ a1 a2))>
#<alt (/ (* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2)))) (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))))))) (sqrt 2))>
#<alt (* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2)))) (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2))))))))>
#<alt (* (+ (* a1 a1) (* a2 a2)) (/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2)))) (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))))))>
#<alt (/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2)))) (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2))))))>
#<alt (* -1/2 (* th th))>
#<alt (* (+ (* a1 a1) (* a2 a2)) (- 0 (* a2 a2)))>
#<alt (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2)))) (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))))>
#<alt (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2))))>
Outputs
#<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 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 a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (/ a1 (sqrt 2))>
#<alt (/ a1 (sqrt 2))>
#<alt (/ a1 (sqrt 2))>
#<alt (/ a1 (sqrt 2))>
#<alt (/ a1 (sqrt 2))>
#<alt (/ a1 (sqrt 2))>
#<alt (/ a1 (sqrt 2))>
#<alt (/ a1 (sqrt 2))>
#<alt (/ a1 (sqrt 2))>
#<alt (/ a1 (sqrt 2))>
#<alt (/ a1 (sqrt 2))>
#<alt (/ a1 (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) (+ 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))))>
#<alt (* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))>
#<alt (* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))>
#<alt (* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))>
#<alt (* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))>
#<alt (* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))>
#<alt (* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))>
#<alt (* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))>
#<alt (* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))>
#<alt (* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))>
#<alt (* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))>
#<alt (* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))>
#<alt (pow a2 2)>
#<alt (+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))>
#<alt (+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))>
#<alt (+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))>
#<alt (* -1/2 (* (pow a2 2) (pow th 2)))>
#<alt (* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))>
#<alt (* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))>
#<alt (* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))>
#<alt (* -1/2 (* (pow a2 2) (pow th 2)))>
#<alt (* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))>
#<alt (* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))>
#<alt (* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))>
#<alt 1>
#<alt (+ 1 (* -1/2 (pow th 2)))>
#<alt (+ 1 (* -1/2 (pow th 2)))>
#<alt (+ 1 (* -1/2 (pow th 2)))>
#<alt (* -1/2 (pow th 2))>
#<alt (* (pow th 2) (- (/ 1 (pow th 2)) 1/2))>
#<alt (* (pow th 2) (- (/ 1 (pow th 2)) 1/2))>
#<alt (* (pow th 2) (- (/ 1 (pow th 2)) 1/2))>
#<alt (* -1/2 (pow th 2))>
#<alt (* (pow th 2) (- (/ 1 (pow th 2)) 1/2))>
#<alt (* (pow th 2) (- (/ 1 (pow th 2)) 1/2))>
#<alt (* (pow th 2) (- (/ 1 (pow th 2)) 1/2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (+ (* a1 (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (* a1 (+ (* -1 (/ a2 (sqrt 2))) (+ (* a1 (+ (* 2 (/ 1 (sqrt 2))) (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (pow a2 2)))) (/ a2 (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (* a1 (+ (* -1 (/ a2 (sqrt 2))) (+ (* a1 (+ (* 2 (/ 1 (sqrt 2))) (+ (/ (* a1 (* (+ a2 (* -1 a2)) (+ (* 2 (/ 1 (sqrt 2))) (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (pow a2 2))))) (pow a2 2)) (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (pow a2 2))))) (/ a2 (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))>
#<alt (* -1 (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (* -1 (/ (pow a2 2) (sqrt 2))) (/ (* (pow a2 2) (+ a2 (* -1 a2))) (* a1 (sqrt 2))))>
#<alt (+ (* -1 (/ (- (/ (pow a2 4) (sqrt 2)) (+ (* -1 (/ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (sqrt 2))) (* -1 (/ (pow a2 4) (sqrt 2))))) (pow a1 2))) (+ (* -1 (/ (pow a2 2) (sqrt 2))) (/ (* (pow a2 2) (+ a2 (* -1 a2))) (* a1 (sqrt 2)))))>
#<alt (+ (* -1 (/ (- (/ (pow a2 4) (sqrt 2)) (+ (* -1 (/ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (sqrt 2))) (* -1 (/ (pow a2 4) (sqrt 2))))) (pow a1 2))) (+ (* -1 (/ (pow a2 2) (sqrt 2))) (+ (/ (* (+ a2 (* -1 a2)) (- (/ (pow a2 4) (sqrt 2)) (+ (* -1 (/ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (sqrt 2))) (* -1 (/ (pow a2 4) (sqrt 2)))))) (pow a1 3)) (+ (/ (* (pow a2 2) (+ a2 (* -1 a2))) (* a1 (sqrt 2))) (/ (* (pow a2 4) (+ a2 (* -1 a2))) (* (pow a1 3) (sqrt 2)))))))>
#<alt (* -1 (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (* -1 (/ (pow a2 2) (sqrt 2))) (/ (* (pow a2 2) (+ a2 (* -1 a2))) (* a1 (sqrt 2))))>
#<alt (+ (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow a2 4) (sqrt 2))) (+ (/ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (sqrt 2)) (/ (pow a2 4) (sqrt 2)))) a1)) (/ (* (pow a2 2) (+ a2 (* -1 a2))) (sqrt 2))) a1)) (* -1 (/ (pow a2 2) (sqrt 2))))>
#<alt (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a2 (* -1 a2)) (- (* -1 (/ (pow a2 4) (sqrt 2))) (+ (/ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (sqrt 2)) (/ (pow a2 4) (sqrt 2))))) a1)) (+ (* -1 (/ (pow a2 4) (sqrt 2))) (/ (* (pow a2 4) (+ a2 (* -1 a2))) (* a1 (sqrt 2))))) (+ (/ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (sqrt 2)) (/ (pow a2 4) (sqrt 2)))) a1)) (/ (* (pow a2 2) (+ a2 (* -1 a2))) (sqrt 2))) a1)) (* -1 (/ (pow a2 2) (sqrt 2))))>
#<alt (* -1 (/ (pow a2 2) (sqrt 2)))>
#<alt (* (pow a2 2) (- (* -2 (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (/ 1 (sqrt 2))))>
#<alt (* (pow a2 2) (- (* (pow a2 2) (- (* 2 (/ (* a2 (+ a1 (* -1 a1))) (* (pow a1 4) (sqrt 2)))) (* 2 (/ 1 (* (pow a1 2) (sqrt 2)))))) (/ 1 (sqrt 2))))>
#<alt (* (pow a2 2) (- (* (pow a2 2) (- (* a2 (+ (* -1 (* a2 (- (* 2 (/ 1 (* (pow a1 4) (sqrt 2)))) (* -2 (/ (pow (+ a1 (* -1 a1)) 2) (* (pow a1 6) (sqrt 2))))))) (* 2 (/ (+ a1 (* -1 a1)) (* (pow a1 4) (sqrt 2)))))) (* 2 (/ 1 (* (pow a1 2) (sqrt 2)))))) (/ 1 (sqrt 2))))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (* (pow a2 2) (+ (* -1 (/ a1 (* a2 (sqrt 2)))) (+ (/ 1 (sqrt 2)) (/ a1 (* a2 (sqrt 2))))))>
#<alt (* (pow a2 2) (+ (* -1 (/ a1 (* a2 (sqrt 2)))) (+ (* -1 (/ (- (* -1 (/ (pow a1 2) (sqrt 2))) (+ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2)))) (pow a2 2))) (+ (/ 1 (sqrt 2)) (/ a1 (* a2 (sqrt 2)))))))>
#<alt (* (pow a2 2) (+ (* -1 (/ a1 (* a2 (sqrt 2)))) (+ (* -1 (/ (* (+ a1 (* -1 a1)) (- (* -1 (/ (pow a1 2) (sqrt 2))) (+ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2))))) (pow a2 3))) (+ (* -1 (/ (- (* -1 (/ (pow a1 2) (sqrt 2))) (+ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2)))) (pow a2 2))) (+ (/ 1 (sqrt 2)) (+ (/ a1 (* a2 (sqrt 2))) (/ (* (pow a1 2) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (pow a2 3))))))))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (* (pow a2 2) (+ (* -1 (/ (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))) a2)) (/ 1 (sqrt 2))))>
#<alt (* (pow a2 2) (+ (* -1 (/ (- (+ (* -1 (/ a1 (sqrt 2))) (+ (* -1 (/ (pow a1 2) (* a2 (sqrt 2)))) (/ a1 (sqrt 2)))) (+ (/ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) a2) (/ (pow a1 2) (* a2 (sqrt 2))))) a2)) (/ 1 (sqrt 2))))>
#<alt (* (pow a2 2) (+ (* -1 (/ (+ (* -1 (/ a1 (sqrt 2))) (+ (* -1 (/ (+ (* -1 (- (* -1 (/ (pow a1 2) (sqrt 2))) (+ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2))))) (* -1 (/ (+ (* -1 (* (+ a1 (* -1 a1)) (- (* -1 (/ (pow a1 2) (sqrt 2))) (+ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2)))))) (* (pow a1 2) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) a2))) a2)) (/ a1 (sqrt 2)))) a2)) (/ 1 (sqrt 2))))>
#<alt (pow a2 2)>
#<alt (+ (* a1 (+ a2 (* -1 a2))) (pow a2 2))>
#<alt (+ (* a1 (+ a2 (+ (* -1 a2) (* a1 (+ 2 (/ (pow (+ a2 (* -1 a2)) 2) (pow a2 2))))))) (pow a2 2))>
#<alt (+ (* a1 (+ a2 (+ (* -1 a2) (* a1 (+ 2 (+ (/ (* a1 (* (+ 2 (/ (pow (+ a2 (* -1 a2)) 2) (pow a2 2))) (+ a2 (* -1 a2)))) (pow a2 2)) (/ (pow (+ a2 (* -1 a2)) 2) (pow a2 2)))))))) (pow a2 2))>
#<alt (* -1 (pow a2 2))>
#<alt (+ (* -1 (pow a2 2)) (/ (* (pow a2 2) (+ a2 (* -1 a2))) a1))>
#<alt (+ (* -1 (/ (- (pow a2 4) (+ (* -1 (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2))) (* -1 (pow a2 4)))) (pow a1 2))) (+ (* -1 (pow a2 2)) (/ (* (pow a2 2) (+ a2 (* -1 a2))) a1)))>
#<alt (+ (* -1 (/ (- (pow a2 4) (+ (* -1 (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2))) (* -1 (pow a2 4)))) (pow a1 2))) (+ (* -1 (pow a2 2)) (+ (/ (* (+ a2 (* -1 a2)) (- (pow a2 4) (+ (* -1 (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2))) (* -1 (pow a2 4))))) (pow a1 3)) (+ (/ (* (pow a2 2) (+ a2 (* -1 a2))) a1) (/ (* (pow a2 4) (+ a2 (* -1 a2))) (pow a1 3))))))>
#<alt (* -1 (pow a2 2))>
#<alt (+ (* -1 (pow a2 2)) (/ (* (pow a2 2) (+ a2 (* -1 a2))) a1))>
#<alt (+ (* -1 (/ (- (* -1 (/ (- (* -1 (pow a2 4)) (+ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (pow a2 4))) a1)) (* (pow a2 2) (+ a2 (* -1 a2)))) a1)) (* -1 (pow a2 2)))>
#<alt (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a2 (* -1 a2)) (- (* -1 (pow a2 4)) (+ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (pow a2 4)))) a1)) (+ (* -1 (pow a2 4)) (/ (* (pow a2 4) (+ a2 (* -1 a2))) a1))) (+ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (pow a2 4))) a1)) (* (pow a2 2) (+ a2 (* -1 a2)))) a1)) (* -1 (pow a2 2)))>
#<alt (* -1 (pow a2 2))>
#<alt (* (pow a2 2) (- (* -2 (/ (pow a2 2) (pow a1 2))) 1))>
#<alt (* (pow a2 2) (- (* (pow a2 2) (- (* 2 (/ (* a2 (+ a1 (* -1 a1))) (pow a1 4))) (* 2 (/ 1 (pow a1 2))))) 1))>
#<alt (* (pow a2 2) (- (* (pow a2 2) (- (* a2 (+ (* -1 (* a2 (- (* 2 (/ 1 (pow a1 4))) (* -2 (/ (pow (+ a1 (* -1 a1)) 2) (pow a1 6)))))) (* 2 (/ (+ a1 (* -1 a1)) (pow a1 4))))) (* 2 (/ 1 (pow a1 2))))) 1))>
#<alt (pow a2 2)>
#<alt (* (pow a2 2) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2))))>
#<alt (* (pow a2 2) (+ 1 (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (- (* -1 (pow a1 2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) (pow a2 2))) (/ a1 a2)))))>
#<alt (* (pow a2 2) (+ 1 (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (* (+ a1 (* -1 a1)) (- (* -1 (pow a1 2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2)))) (pow a2 3))) (+ (* -1 (/ (- (* -1 (pow a1 2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) (pow a2 2))) (+ (/ a1 a2) (/ (* (pow a1 2) (+ a1 (* -1 a1))) (pow a2 3))))))))>
#<alt (pow a2 2)>
#<alt (* (pow a2 2) (+ 1 (* -1 (/ (+ a1 (* -1 a1)) a2))))>
#<alt (* (pow a2 2) (+ 1 (* -1 (/ (- (+ a1 (+ (* -1 a1) (* -1 (/ (pow a1 2) a2)))) (+ (/ (pow a1 2) a2) (/ (pow (+ a1 (* -1 a1)) 2) a2))) a2))))>
#<alt (* (pow a2 2) (+ 1 (* -1 (/ (+ a1 (+ (* -1 a1) (* -1 (/ (+ (* -1 (- (* -1 (pow a1 2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2)))) (* -1 (/ (+ (* -1 (* (+ a1 (* -1 a1)) (- (* -1 (pow a1 2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))))) (* (pow a1 2) (+ a1 (* -1 a1)))) a2))) a2)))) a2))))>
#<alt (/ -1 (pow a2 2))>
#<alt (- (* -1 (/ (pow a1 2) (pow a2 4))) (/ 1 (pow a2 2)))>
#<alt (- (* (pow a1 2) (- (* -1 (/ (pow a1 2) (pow a2 6))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))>
#<alt (- (* (pow a1 2) (- (* (pow a1 2) (- (* -1 (/ (pow a1 2) (pow a2 8))) (/ 1 (pow a2 6)))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))>
#<alt (/ 1 (pow a1 2))>
#<alt (/ (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))) (pow a1 2))>
#<alt (/ (- (+ 1 (* -1 (/ (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2))) (pow a1 2)))) (+ (* -1 (/ a2 a1)) (/ a2 a1))) (pow a1 2))>
#<alt (/ (- (+ 1 (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2))))) (* (pow a2 2) (+ a2 (* -1 a2)))) (pow a1 3)))) (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a1 2))) (/ a2 a1))))) (pow a1 2))>
#<alt (/ 1 (pow a1 2))>
#<alt (/ (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))) (pow a1 2))>
#<alt (/ (+ 1 (* -1 (/ (- (+ (* -1 (/ (pow a2 2) a1)) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) a1))) (* -1 (+ a2 (* -1 a2)))) a1))) (pow a1 2))>
#<alt (/ (+ 1 (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (pow a2 2) (+ a2 (* -1 a2))) a1)) (/ (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2)))) a1)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2)))) a1)) (* -1 (+ a2 (* -1 a2)))) a1))) (pow a1 2))>
#<alt (/ 1 (pow a1 2))>
#<alt (+ (/ 1 (pow a1 2)) (/ (pow a2 2) (pow a1 4)))>
#<alt (+ (* (pow a2 2) (+ (/ 1 (pow a1 4)) (/ (pow a2 2) (pow a1 6)))) (/ 1 (pow a1 2)))>
#<alt (+ (* (pow a2 2) (+ (* (pow a2 2) (+ (/ 1 (pow a1 6)) (/ (pow a2 2) (pow a1 8)))) (/ 1 (pow a1 4)))) (/ 1 (pow a1 2)))>
#<alt (/ -1 (pow a2 2))>
#<alt (/ (- (* -1 (/ (+ a1 (* -1 a1)) a2)) 1) (pow a2 2))>
#<alt (/ (- (* -1 (/ (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2)) (pow a2 2))) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2)))) (pow a2 2))>
#<alt (/ (- (* -1 (/ (+ (* (+ a1 (* -1 a1)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) (* (pow a1 2) (+ a1 (* -1 a1)))) (pow a2 3))) (+ 1 (+ (* -1 (/ a1 a2)) (+ (/ a1 a2) (+ (/ (pow a1 2) (pow a2 2)) (/ (pow (+ a1 (* -1 a1)) 2) (pow a2 2))))))) (pow a2 2))>
#<alt (/ -1 (pow a2 2))>
#<alt (/ (- (+ (* -1 (/ a1 a2)) (/ a1 a2)) 1) (pow a2 2))>
#<alt (/ (- (* -1 (/ (- (+ (/ (pow a1 2) a2) (/ (pow (+ a1 (* -1 a1)) 2) a2)) (+ a1 (* -1 a1))) a2)) 1) (pow a2 2))>
#<alt (/ (- (* -1 (/ (- (* -1 (/ (- (+ (/ (* (+ a1 (* -1 a1)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) a2) (/ (* (pow a1 2) (+ a1 (* -1 a1))) a2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) a2)) (+ a1 (* -1 a1))) a2)) 1) (pow a2 2))>
#<alt (/ 1 a2)>
#<alt (+ (* -1 (/ a1 (pow a2 2))) (/ 1 a2))>
#<alt (+ (* a1 (- (/ a1 (pow a2 3)) (/ 1 (pow a2 2)))) (/ 1 a2))>
#<alt (+ (* a1 (- (* a1 (+ (* -1 (/ a1 (pow a2 4))) (/ 1 (pow a2 3)))) (/ 1 (pow a2 2)))) (/ 1 a2))>
#<alt (/ 1 a1)>
#<alt (/ (+ 1 (* -1 (/ a2 a1))) a1)>
#<alt (/ (- (+ 1 (/ (pow a2 2) (pow a1 2))) (/ a2 a1)) a1)>
#<alt (/ (- (+ 1 (* -1 (/ (pow a2 3) (pow a1 3)))) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (/ a2 a1))) a1)>
#<alt (/ 1 a1)>
#<alt (* -1 (/ (- (/ a2 a1) 1) a1))>
#<alt (* -1 (/ (- (* -1 (/ (- (/ (pow a2 2) a1) a2) a1)) 1) a1))>
#<alt (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow a2 3) a1) (pow a2 2)) a1)) a2) a1)) 1) a1))>
#<alt (/ 1 a1)>
#<alt (+ (* -1 (/ a2 (pow a1 2))) (/ 1 a1))>
#<alt (+ (* a2 (- (/ a2 (pow a1 3)) (/ 1 (pow a1 2)))) (/ 1 a1))>
#<alt (+ (* a2 (- (* a2 (+ (* -1 (/ a2 (pow a1 4))) (/ 1 (pow a1 3)))) (/ 1 (pow a1 2)))) (/ 1 a1))>
#<alt (/ 1 a2)>
#<alt (/ (+ 1 (* -1 (/ a1 a2))) a2)>
#<alt (/ (- (+ 1 (/ (pow a1 2) (pow a2 2))) (/ a1 a2)) a2)>
#<alt (/ (- (+ 1 (* -1 (/ (pow a1 3) (pow a2 3)))) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (/ a1 a2))) a2)>
#<alt (/ 1 a2)>
#<alt (* -1 (/ (- (/ a1 a2) 1) a2))>
#<alt (* -1 (/ (- (* -1 (/ (- (/ (pow a1 2) a2) a1) a2)) 1) a2))>
#<alt (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow a1 3) a2) (pow a1 2)) a2)) a1) a2)) 1) a2))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (+ (/ (* a1 (+ (* -1 (pow a2 5)) (pow a2 5))) (* (pow a2 4) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (* a1 (- (* a1 (- (/ 1 (sqrt 2)) (+ (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (* (pow a2 4) (sqrt 2)))) (* -1 (/ (pow (+ (* -1 (pow a2 5)) (pow a2 5)) 2) (* (pow a2 10) (sqrt 2))))))) (* -1 (/ (+ (* -1 (pow a2 5)) (pow a2 5)) (* (pow a2 4) (sqrt 2)))))) (/ (pow a2 2) (sqrt 2)))>
#<alt (+ (* a1 (- (* a1 (- (+ (* -1 (* a1 (+ (* -1 (/ (* (+ (* -1 (pow a2 4)) (pow a2 4)) (+ (* -1 (pow a2 5)) (pow a2 5))) (* (pow a2 10) (sqrt 2)))) (+ (* -1 (/ (* (+ (* -1 (pow a2 5)) (pow a2 5)) (- (/ 1 (sqrt 2)) (+ (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (* (pow a2 4) (sqrt 2)))) (* -1 (/ (pow (+ (* -1 (pow a2 5)) (pow a2 5)) 2) (* (pow a2 10) (sqrt 2))))))) (pow a2 6))) (* -1 (/ (+ (* -1 (pow a2 3)) (pow a2 3)) (* (pow a2 4) (sqrt 2)))))))) (/ 1 (sqrt 2))) (+ (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (* (pow a2 4) (sqrt 2)))) (* -1 (/ (pow (+ (* -1 (pow a2 5)) (pow a2 5)) 2) (* (pow a2 10) (sqrt 2))))))) (* -1 (/ (+ (* -1 (pow a2 5)) (pow a2 5)) (* (pow a2 4) (sqrt 2)))))) (/ (pow a2 2) (sqrt 2)))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))) a1)) (/ 1 (sqrt 2))))>
#<alt (* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))))) (* -1 (/ (pow a2 2) (sqrt 2)))) (pow a1 2))) (/ 1 (sqrt 2))) (+ (* -1 (/ a2 (* a1 (sqrt 2)))) (/ a2 (* a1 (sqrt 2))))))>
#<alt (* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))))) (* -1 (/ (pow a2 2) (sqrt 2)))))) (+ (* -1 (* (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))) (+ (* -1 (pow a2 2)) (pow a2 2)))) (+ (* -1 (/ (pow a2 3) (sqrt 2))) (/ (pow a2 3) (sqrt 2))))) (pow a1 3))) (/ 1 (sqrt 2))) (+ (* -1 (/ a2 (* a1 (sqrt 2)))) (+ (* -1 (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (pow a1 2))) (+ (* -1 (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (/ a2 (* a1 (sqrt 2))))))))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))) a1)) (/ 1 (sqrt 2))))>
#<alt (* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (+ (* -1 (/ (+ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (/ (pow a2 2) (sqrt 2))) a1)) (/ a2 (sqrt 2)))) a1)) (/ 1 (sqrt 2))))>
#<alt (* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (pow a2 3) (sqrt 2))) (+ (* (+ a2 (* -1 a2)) (+ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (/ (pow a2 2) (sqrt 2)))) (+ (* (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))) (+ (* -1 (pow a2 2)) (pow a2 2))) (/ (pow a2 3) (sqrt 2))))) a1)) (+ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (/ (pow a2 2) (sqrt 2)))) a1)) (/ a2 (sqrt 2)))) a1)) (/ 1 (sqrt 2))))>
#<alt (/ (pow a1 2) (sqrt 2))>
#<alt (+ (* -1 (* a2 (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))>
#<alt (+ (* a2 (- (* a2 (- (/ 1 (sqrt 2)) (* -1 (/ (* (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))) (+ (* -1 (pow a1 5)) (pow a1 5))) (pow a1 6))))) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))>
#<alt (+ (* a2 (- (* a2 (- (+ (* -1 (* a2 (+ (* -1 (/ (* (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))) (+ (* -1 (pow a1 4)) (pow a1 4))) (pow a1 6))) (/ (* (+ (* -1 (pow a1 5)) (pow a1 5)) (- (/ 1 (sqrt 2)) (* -1 (/ (* (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))) (+ (* -1 (pow a1 5)) (pow a1 5))) (pow a1 6))))) (pow a1 6))))) (/ 1 (sqrt 2))) (* -1 (/ (* (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))) (+ (* -1 (pow a1 5)) (pow a1 5))) (pow a1 6))))) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (* (pow a2 2) (+ (* -1 (/ a1 (* a2 (sqrt 2)))) (+ (/ 1 (sqrt 2)) (/ a1 (* a2 (sqrt 2))))))>
#<alt (* (pow a2 2) (- (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (+ a1 (* -1 a1)) (* a2 (sqrt 2)))) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (* (pow a2 2) (sqrt 2)))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (* (pow a2 2) (sqrt 2))))))))>
#<alt (* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (* (+ a1 (* -1 a1)) (- (/ (pow a1 2) (sqrt 2)) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2))))))) (+ (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 2)) (pow a1 2))) (sqrt 2))) (* -1 (/ (+ (* -1 (pow a1 3)) (pow a1 3)) (sqrt 2))))) (pow a2 3))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (+ (* -1 (/ (+ a1 (* -1 a1)) (* a2 (sqrt 2)))) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (* (pow a2 2) (sqrt 2)))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (* (pow a2 2) (sqrt 2))))))))>
#<alt (/ (pow a2 2) (sqrt 2))>
#<alt (* (pow a2 2) (+ (* -1 (/ (+ a1 (* -1 a1)) (* a2 (sqrt 2)))) (/ 1 (sqrt 2))))>
#<alt (* (pow a2 2) (+ (* -1 (/ (- (* -1 (/ (- (/ (pow a1 2) (sqrt 2)) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2))))) a2)) (* -1 (/ (+ a1 (* -1 a1)) (sqrt 2)))) a2)) (/ 1 (sqrt 2))))>
#<alt (* (pow a2 2) (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 2)) (pow a1 2))) (* a2 (sqrt 2)))) (+ (* -1 (/ (* (+ a1 (* -1 a1)) (- (/ (pow a1 2) (sqrt 2)) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2)))))) a2)) (+ (* -1 (/ (+ (* -1 (pow a1 3)) (pow a1 3)) (* a2 (sqrt 2)))) (/ (pow a1 2) (sqrt 2))))) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2))))) a2)) (* -1 (/ (+ a1 (* -1 a1)) (sqrt 2)))) a2)) (/ 1 (sqrt 2))))>
#<alt (pow a2 2)>
#<alt (+ (/ (* a1 (+ (* -1 (pow a2 5)) (pow a2 5))) (pow a2 4)) (pow a2 2))>
#<alt (+ (* a1 (- (* a1 (- 1 (+ (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (pow a2 4))) (* -1 (/ (pow (+ (* -1 (pow a2 5)) (pow a2 5)) 2) (pow a2 10)))))) (* -1 (/ (+ (* -1 (pow a2 5)) (pow a2 5)) (pow a2 4))))) (pow a2 2))>
#<alt (+ (* a1 (- (* a1 (- (+ 1 (* -1 (* a1 (+ (* -1 (/ (* (+ (* -1 (pow a2 4)) (pow a2 4)) (+ (* -1 (pow a2 5)) (pow a2 5))) (pow a2 10))) (+ (* -1 (/ (* (+ (* -1 (pow a2 5)) (pow a2 5)) (- 1 (+ (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (pow a2 4))) (* -1 (/ (pow (+ (* -1 (pow a2 5)) (pow a2 5)) 2) (pow a2 10)))))) (pow a2 6))) (* -1 (/ (+ (* -1 (pow a2 3)) (pow a2 3)) (pow a2 4)))))))) (+ (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (pow a2 4))) (* -1 (/ (pow (+ (* -1 (pow a2 5)) (pow a2 5)) 2) (pow a2 10)))))) (* -1 (/ (+ (* -1 (pow a2 5)) (pow a2 5)) (pow a2 4))))) (pow a2 2))>
#<alt (pow a1 2)>
#<alt (* (pow a1 2) (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))))>
#<alt (* (pow a1 2) (- (+ 1 (* -1 (/ (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2))) (pow a1 2)))) (+ (* -1 (/ a2 a1)) (/ a2 a1))))>
#<alt (* (pow a1 2) (- (+ 1 (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2))))) (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (pow a2 2)))) (+ (* -1 (pow a2 3)) (pow a2 3)))) (pow a1 3)))) (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a1 2))) (/ a2 a1))))))>
#<alt (pow a1 2)>
#<alt (* (pow a1 2) (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))))>
#<alt (* (pow a1 2) (+ 1 (* -1 (/ (+ a2 (+ (* -1 a2) (* -1 (/ (+ (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) a1)))) a1))))>
#<alt (* (pow a1 2) (+ 1 (* -1 (/ (+ a2 (+ (* -1 a2) (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow a2 3)) (+ (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (pow a2 2))) (+ (* (+ a2 (* -1 a2)) (+ (pow a2 2) (pow (+ a2 (* -1 a2)) 2))) (pow a2 3)))) a1)) (+ (pow a2 2) (pow (+ a2 (* -1 a2)) 2))) a1)))) a1))))>
#<alt (pow a1 2)>
#<alt (+ (* -1 (* a2 (+ a1 (* -1 a1)))) (pow a1 2))>
#<alt (+ (* a2 (- (* a2 (- 1 (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 5)) (pow a1 5))) (pow a1 6))))) (+ a1 (* -1 a1)))) (pow a1 2))>
#<alt (+ (* a2 (- (* a2 (- (+ 1 (* -1 (* a2 (+ (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 4)) (pow a1 4))) (pow a1 6))) (/ (* (+ (* -1 (pow a1 5)) (pow a1 5)) (- 1 (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 5)) (pow a1 5))) (pow a1 6))))) (pow a1 6)))))) (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 5)) (pow a1 5))) (pow a1 6))))) (+ a1 (* -1 a1)))) (pow a1 2))>
#<alt (pow a2 2)>
#<alt (* (pow a2 2) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2))))>
#<alt (* (pow a2 2) (- (+ 1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (+ a1 (* -1 a1)) a2)) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (pow a2 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (pow a2 2)))))))>
#<alt (* (pow a2 2) (- (+ 1 (+ (* -1 (/ (+ (* -1 (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 2)) (pow a1 2)))) (+ (* -1 (* (+ a1 (* -1 a1)) (- (pow a1 2) (+ (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (* -1 (pow (+ a1 (* -1 a1)) 2)))))) (* -1 (+ (* -1 (pow a1 3)) (pow a1 3))))) (pow a2 3))) (/ (pow a1 2) (pow a2 2)))) (+ (* -1 (/ (+ a1 (* -1 a1)) a2)) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (pow a2 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (pow a2 2)))))))>
#<alt (pow a2 2)>
#<alt (* (pow a2 2) (+ 1 (* -1 (/ (+ a1 (* -1 a1)) a2))))>
#<alt (* (pow a2 2) (+ 1 (* -1 (/ (- (* -1 (/ (- (pow a1 2) (+ (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (* -1 (pow (+ a1 (* -1 a1)) 2)))) a2)) (* -1 (+ a1 (* -1 a1)))) a2))))>
#<alt (* (pow a2 2) (+ 1 (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 2)) (pow a1 2))) a2)) (+ (* -1 (/ (* (+ a1 (* -1 a1)) (- (pow a1 2) (+ (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (* -1 (pow (+ a1 (* -1 a1)) 2))))) a2)) (+ (* -1 (/ (+ (* -1 (pow a1 3)) (pow a1 3)) a2)) (pow a1 2)))) (+ (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (* -1 (pow (+ a1 (* -1 a1)) 2)))) a2)) (* -1 (+ a1 (* -1 a1)))) a2))))>
#<alt (* -1 (pow a2 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 (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 (+ (* -1 (pow a2 2)) (pow a1 2))>
#<alt (+ (* -1 (pow a2 2)) (pow a1 2))>
#<alt (+ (* -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 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (pow a1 4)))) (/ (pow a2 2) (pow a1 2))))>
#<alt (* (pow a1 2) (- (+ 1 (/ (* (pow a2 2) (+ (* -1 (pow a2 4)) (pow a2 4))) (pow a1 6))) (+ (* -1 (/ (pow a2 4) (pow a1 4))) (+ (/ (pow a2 2) (pow a1 2)) (/ (pow a2 4) (pow a1 4))))))>
#<alt (pow a1 2)>
#<alt (* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))>
#<alt (* (pow a1 2) (- (+ 1 (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (pow a1 4)))) (/ (pow a2 2) (pow a1 2))))>
#<alt (* (pow a1 2) (- (+ 1 (/ (* (pow a2 2) (+ (* -1 (pow a2 4)) (pow a2 4))) (pow a1 6))) (+ (* -1 (/ (pow a2 4) (pow a1 4))) (+ (/ (pow a2 2) (pow a1 2)) (/ (pow a2 4) (pow a1 4))))))>
#<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) (- (* -1 (/ (+ (* -1 (pow a1 4)) (pow a1 4)) (pow a2 4))) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))))>
#<alt (* (pow a2 2) (- (/ (* (pow a1 2) (+ (* -1 (pow a1 4)) (pow a1 4))) (pow a2 6)) (+ 1 (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (pow a1 4) (pow a2 4))) (/ (pow a1 4) (pow a2 4)))))))>
#<alt (* -1 (pow a2 2))>
#<alt (* (pow a2 2) (- (/ (pow a1 2) (pow a2 2)) 1))>
#<alt (* (pow a2 2) (- (* -1 (/ (+ (* -1 (pow a1 4)) (pow a1 4)) (pow a2 4))) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))))>
#<alt (* (pow a2 2) (- (/ (* (pow a1 2) (+ (* -1 (pow a1 4)) (pow a1 4))) (pow a2 6)) (+ 1 (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (pow a1 4) (pow a2 4))) (/ (pow a1 4) (pow a2 4)))))))>
#<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 (+ (* -1 (* (pow a1 2) (pow a2 2))) (* -1 (pow a2 4)))>
#<alt (+ (* -1 (* (pow a1 2) (pow a2 2))) (* -1 (pow a2 4)))>
#<alt (+ (* -1 (* (pow a1 2) (pow a2 2))) (* -1 (pow a2 4)))>
#<alt (* -1 (* (pow a1 2) (pow a2 2)))>
#<alt (* (pow a1 2) (+ (* -1 (/ (pow a2 4) (pow a1 2))) (* -1 (pow a2 2))))>
#<alt (* (pow a1 2) (+ (* -1 (/ (pow a2 4) (pow a1 2))) (* -1 (pow a2 2))))>
#<alt (* (pow a1 2) (+ (* -1 (/ (pow a2 4) (pow a1 2))) (* -1 (pow a2 2))))>
#<alt (* -1 (* (pow a1 2) (pow a2 2)))>
#<alt (* (pow a1 2) (+ (* -1 (/ (pow a2 4) (pow a1 2))) (* -1 (pow a2 2))))>
#<alt (* (pow a1 2) (+ (* -1 (/ (pow a2 4) (pow a1 2))) (* -1 (pow a2 2))))>
#<alt (* (pow a1 2) (+ (* -1 (/ (pow a2 4) (pow a1 2))) (* -1 (pow a2 2))))>
#<alt (* -1 (* (pow a1 2) (pow a2 2)))>
#<alt (* (pow a2 2) (+ (* -1 (pow a1 2)) (* -1 (pow a2 2))))>
#<alt (* (pow a2 2) (+ (* -1 (pow a1 2)) (* -1 (pow a2 2))))>
#<alt (* (pow a2 2) (+ (* -1 (pow a1 2)) (* -1 (pow a2 2))))>
#<alt (* -1 (pow a2 4))>
#<alt (* (pow a2 4) (- (* -1 (/ (pow a1 2) (pow a2 2))) 1))>
#<alt (* (pow a2 4) (- (* -1 (/ (pow a1 2) (pow a2 2))) 1))>
#<alt (* (pow a2 4) (- (* -1 (/ (pow a1 2) (pow a2 2))) 1))>
#<alt (* -1 (pow a2 4))>
#<alt (* (pow a2 4) (- (* -1 (/ (pow a1 2) (pow a2 2))) 1))>
#<alt (* (pow a2 4) (- (* -1 (/ (pow a1 2) (pow a2 2))) 1))>
#<alt (* (pow a2 4) (- (* -1 (/ (pow a1 2) (pow a2 2))) 1))>
#<alt (/ -1 (pow a2 2))>
#<alt (- (* -1 (/ (pow a1 2) (pow a2 4))) (/ 1 (pow a2 2)))>
#<alt (- (* (pow a1 2) (- (* -1 (/ (pow a1 2) (pow a2 6))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))>
#<alt (- (* (pow a1 2) (- (* (pow a1 2) (- (* -1 (/ (pow a1 2) (pow a2 8))) (/ 1 (pow a2 6)))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))>
#<alt (/ 1 (pow a1 2))>
#<alt (/ (+ 1 (/ (pow a2 2) (pow a1 2))) (pow a1 2))>
#<alt (/ (+ 1 (+ (/ (pow a2 2) (pow a1 2)) (/ (pow a2 4) (pow a1 4)))) (pow a1 2))>
#<alt (/ (+ 1 (+ (/ (pow a2 2) (pow a1 2)) (+ (/ (pow a2 4) (pow a1 4)) (/ (pow a2 6) (pow a1 6))))) (pow a1 2))>
#<alt (/ 1 (pow a1 2))>
#<alt (/ (+ 1 (/ (pow a2 2) (pow a1 2))) (pow a1 2))>
#<alt (/ (+ 1 (+ (/ (pow a2 2) (pow a1 2)) (/ (pow a2 4) (pow a1 4)))) (pow a1 2))>
#<alt (/ (+ 1 (+ (/ (pow a2 2) (pow a1 2)) (+ (/ (pow a2 4) (pow a1 4)) (/ (pow a2 6) (pow a1 6))))) (pow a1 2))>
#<alt (/ 1 (pow a1 2))>
#<alt (+ (/ 1 (pow a1 2)) (/ (pow a2 2) (pow a1 4)))>
#<alt (+ (* (pow a2 2) (+ (/ 1 (pow a1 4)) (/ (pow a2 2) (pow a1 6)))) (/ 1 (pow a1 2)))>
#<alt (+ (* (pow a2 2) (+ (* (pow a2 2) (+ (/ 1 (pow a1 6)) (/ (pow a2 2) (pow a1 8)))) (/ 1 (pow a1 4)))) (/ 1 (pow a1 2)))>
#<alt (/ -1 (pow a2 2))>
#<alt (/ (- (* -1 (/ (pow a1 2) (pow a2 2))) 1) (pow a2 2))>
#<alt (/ (- (+ (* -1 (/ (pow a1 2) (pow a2 2))) (* -1 (/ (pow a1 4) (pow a2 4)))) 1) (pow a2 2))>
#<alt (/ (- (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (pow a1 4) (pow a2 4))) (* -1 (/ (pow a1 6) (pow a2 6))))) 1) (pow a2 2))>
#<alt (/ -1 (pow a2 2))>
#<alt (/ (- (* -1 (/ (pow a1 2) (pow a2 2))) 1) (pow a2 2))>
#<alt (/ (- (+ (* -1 (/ (pow a1 2) (pow a2 2))) (* -1 (/ (pow a1 4) (pow a2 4)))) 1) (pow a2 2))>
#<alt (/ (- (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (pow a1 4) (pow a2 4))) (* -1 (/ (pow a1 6) (pow a2 6))))) 1) (pow a2 2))>
#<alt (* -1 (pow a2 6))>
#<alt (- (pow a1 6) (pow a2 6))>
#<alt (- (pow a1 6) (pow a2 6))>
#<alt (- (pow a1 6) (pow a2 6))>
#<alt (pow a1 6)>
#<alt (* (pow a1 6) (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))))>
#<alt (* (pow a1 6) (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))))>
#<alt (* (pow a1 6) (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))))>
#<alt (pow a1 6)>
#<alt (* (pow a1 6) (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))))>
#<alt (* (pow a1 6) (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))))>
#<alt (* (pow a1 6) (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))))>
#<alt (pow a1 6)>
#<alt (+ (* -1 (pow a2 6)) (pow a1 6))>
#<alt (+ (* -1 (pow a2 6)) (pow a1 6))>
#<alt (+ (* -1 (pow a2 6)) (pow a1 6))>
#<alt (* -1 (pow a2 6))>
#<alt (* (pow a2 6) (- (/ (pow a1 6) (pow a2 6)) 1))>
#<alt (* (pow a2 6) (- (/ (pow a1 6) (pow a2 6)) 1))>
#<alt (* (pow a2 6) (- (/ (pow a1 6) (pow a2 6)) 1))>
#<alt (* -1 (pow a2 6))>
#<alt (* (pow a2 6) (- (/ (pow a1 6) (pow a2 6)) 1))>
#<alt (* (pow a2 6) (- (/ (pow a1 6) (pow a2 6)) 1))>
#<alt (* (pow a2 6) (- (/ (pow a1 6) (pow a2 6)) 1))>
Calls

108 calls:

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

rewrite383.0ms (3.6%)

Algorithm
1×batch-egg-rewrite
Rules
3202×/-lowering-/.f32
3202×/-lowering-/.f64
3090×*-lowering-*.f32
3090×*-lowering-*.f64
1742×fma-lowering-fma.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
042283
1268146
22681146
09023146
Stop Event
1×iter limit
1×node limit
Counts
22 → 972
Calls
Call 1
Inputs
(/ (* (* a2 a2) (cos th)) (sqrt 2))
(* (* a2 a2) (cos th))
(* a2 a2)
(cos th)
(* (/ a1 (sqrt 2)) a1)
(/ a1 (sqrt 2))
(sqrt 2)
(/ (* (* a2 a2) (+ 1 (* -1/2 (* th th)))) (sqrt 2))
(* (* a2 a2) (+ 1 (* -1/2 (* th th))))
(+ 1 (* -1/2 (* th th)))
(/ (* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (- 0 (* a2 a2)))) (sqrt 2))
(* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (- 0 (* a2 a2))))
(/ (/ 1 (+ a1 a2)) (- a1 a2))
(/ 1 (+ a1 a2))
(/ (* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2)))) (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))))))) (sqrt 2))
(* (/ (/ 1 (+ a1 a2)) (- a1 a2)) (* (+ (* a1 a1) (* a2 a2)) (/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2)))) (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2))))))))
(* (+ (* a1 a1) (* a2 a2)) (/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2)))) (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))))))
(/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2)))) (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2))))))
(* -1/2 (* th th))
(* (+ (* a1 a1) (* a2 a2)) (- 0 (* a2 a2)))
(/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (+ (* a1 a1) (* a2 a2)))) (- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))))
(- (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2))))
Outputs
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 (*.f64 a2 a2) (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) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) #s(literal 1 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 (neg.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #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 (*.f64 a2 a2) (cos.f64 th))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a2 (*.f64 a2 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a2 (*.f64 (*.f64 a2 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 a2 (/.f64 (*.f64 a2 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.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 #s(literal 0 binary64) (*.f64 a2 a2))) (/.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/2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (cos.f64 th))) #s(literal -1 binary64)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(*.f64 (cos.f64 th) (*.f64 a2 a2))
(*.f64 (*.f64 a2 (cos.f64 th)) a2)
(+.f64 (*.f64 a2 a2) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (*.f64 a2 a2))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a2)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(fma.f64 a2 a2 #s(literal 0 binary64))
(fma.f64 a2 (*.f64 a2 #s(literal 1 binary64)) #s(literal 0 binary64))
(fma.f64 (*.f64 a2 a2) #s(literal 1 binary64) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 a2 a2) #s(literal 0 binary64))
(fma.f64 (*.f64 #s(literal 1 binary64) a2) a2 #s(literal 0 binary64))
(/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 a2))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(/.f64 (+.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))
(/.f64 (neg.f64 (+.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 0 binary64)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))
(pow.f64 a2 #s(literal 2 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 0 binary64) a2) #s(literal 2 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 (-.f64 #s(literal 0 binary64) a2) (-.f64 #s(literal 0 binary64) a2))
(*.f64 (*.f64 #s(literal 1 binary64) a2) a2)
(*.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)))
(cos.f64 th)
(exp.f64 (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 a1)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(/.f64 (-.f64 #s(literal 0 binary64) a1) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (neg.f64 (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a1 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.f64 (*.f64 a1 (-.f64 #s(literal 0 binary64) a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) a1) a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 a1 #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (neg.f64 (neg.f64 (*.f64 a1 a1))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 a1 (-.f64 #s(literal 0 binary64) a1))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) a1)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) a1) a1)) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal -1 binary64))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 a1 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 a1 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) a1)) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a1 #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) a1))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 a1 #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 0 binary64) a1) (/.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/2 binary64)) a1)
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) a1) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (-.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 th #s(literal -1/2 binary64))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))))))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) #s(literal 1 binary64))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a2 (*.f64 a2 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a2 (*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 a2 (/.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.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))))
(*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.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/2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))) #s(literal -1 binary64)))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(+.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))
(+.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (*.f64 a2 a2))
(-.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))) (/.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (-.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))))
(fma.f64 a2 a2 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))
(fma.f64 a2 (*.f64 a2 #s(literal 1 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))
(fma.f64 a2 (*.f64 a2 (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (*.f64 a2 a2))
(fma.f64 (*.f64 a2 a2) #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))
(fma.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (*.f64 a2 a2))
(fma.f64 #s(literal 1 binary64) (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (*.f64 a2 a2)) (*.f64 a2 a2))
(fma.f64 (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))
(fma.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (*.f64 a2 a2) (*.f64 a2 a2))
(fma.f64 (*.f64 th #s(literal -1/2 binary64)) (*.f64 th (*.f64 a2 a2)) (*.f64 a2 a2))
(fma.f64 (*.f64 #s(literal 1 binary64) a2) a2 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))
(fma.f64 (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) a2) a2 (*.f64 a2 a2))
(fma.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (*.f64 th th) (*.f64 a2 a2))
(fma.f64 (*.f64 (*.f64 a2 a2) (*.f64 th th)) #s(literal -1/2 binary64) (*.f64 a2 a2))
(fma.f64 (*.f64 (*.f64 a2 a2) (*.f64 th #s(literal -1/2 binary64))) th (*.f64 a2 a2))
(/.f64 (+.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 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))))))
(/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))) (-.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (-.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (*.f64 a2 a2) (-.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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (-.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))
(/.f64 (neg.f64 (+.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 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))))) (neg.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))))) (neg.f64 (-.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (-.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 a2 a2))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (-.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))) (*.f64 a2 a2))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (*.f64 a2 a2)))))
(*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (*.f64 a2 a2))
(*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) a2)
(+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))
(+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))) (/.f64 (*.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 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th))) (-.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64))))
(fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 th #s(literal -1/2 binary64)) th #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 th th)) #s(literal -1/2 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 th #s(literal -1/2 binary64))) th #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (-.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th 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 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (-.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (-.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/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (-.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (+.f64 (*.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 #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 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (-.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (neg.f64 (+.f64 (*.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 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th))) #s(literal 1 binary64)) (-.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64)))
(/.f64 (-.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 #s(literal 1/2 binary64) (*.f64 th th))) (*.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 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th)))))
(/.f64 (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (-.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) (*.f64 th th))) #s(literal 1 binary64))) (neg.f64 (-.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64))))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (-.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 th th))) (-.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/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (-.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64))))))
(*.f64 (-.f64 #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)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (-.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 1 binary64)) (*.f64 (-.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (neg.f64 (*.f64 (-.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (/.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 a1 a2))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (/.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (-.f64 a1 a2))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 1 binary64))) (neg.f64 (*.f64 (-.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (/.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (/.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)) (/.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.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 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (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 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.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/2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.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 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64)))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (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 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)))
(+.f64 (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 0 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(+.f64 (*.f64 #s(literal 0 binary64) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 #s(literal 0 binary64) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(fma.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(neg.f64 (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 a1 a2) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 a1 a2) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 a1 a2))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(/.f64 (neg.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(/.f64 (*.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) #s(literal 1 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 a2))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) #s(literal 1 binary64))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 0 binary64)) (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 0 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 #s(literal 0 binary64) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (*.f64 #s(literal 0 binary64) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))))
(pow.f64 (/.f64 (-.f64 a1 a2) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal -1 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)) (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (/.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 a1 a2)))
(*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 a2 a1))
(exp.f64 (*.f64 (log.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (neg.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64))))
(-.f64 #s(literal 0 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 a1 (*.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 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 a1 (*.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 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 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 a1) (*.f64 a2 a2))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))) (/.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)))
(-.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(neg.f64 (/.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)))
(/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)) (-.f64 a1 a2))))
(/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (-.f64 a1 a2) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)))))
(/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2))
(/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (/.f64 #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 a1)) (-.f64 a1 a2)))
(/.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal -1 binary64) (*.f64 (-.f64 a1 a2) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(/.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))))
(/.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)) (+.f64 a2 a1))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) #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 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 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 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 a1 a2))) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 a2))) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 a2 a1))))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))
(pow.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 #s(literal 1 binary64) (+.f64 a2 a1)) (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 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 a1) (*.f64 a2 a2))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 a2 a1))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.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 (*.f64 a2 a2) (*.f64 a1 a1)))))) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (pow.f64 (/.f64 (-.f64 a1 a2) #s(literal -1 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)))
(*.f64 (pow.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (pow.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(exp.f64 (*.f64 (log.f64 (+.f64 a2 a1)) #s(literal -1 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)))
(/.f64 #s(literal 1 binary64) (+.f64 a2 a1))
(/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 a2 a1))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)))))
(pow.f64 (+.f64 a2 a1) #s(literal -1 binary64))
(pow.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 a2 a1))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (+.f64 a2 a1) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 a2 a1) (+.f64 a2 a1)) #s(literal -1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 a2 a1))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) #s(literal 1 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 a1 a2))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)))
(*.f64 (pow.f64 (+.f64 a2 a1) #s(literal -1/2 binary64)) (pow.f64 (+.f64 a2 a1) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (-.f64 a2 a1))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 (-.f64 a2 a1)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal -1 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 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (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 a2 a2) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (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 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.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)))) (+.f64 a2 a1)) (*.f64 (-.f64 a1 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 a2 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2)))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1)) #s(literal 1 binary64)) (*.f64 (-.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1))) (neg.f64 (*.f64 (-.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 a1 a2))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (neg.f64 (-.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 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 1 binary64) (+.f64 a2 a1)) (/.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 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (/.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 a1 a2)))
(/.f64 (*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (-.f64 a1 a2))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1)) #s(literal 1 binary64))) (neg.f64 (*.f64 (-.f64 a1 a2) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.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))))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.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)))) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(/.f64 (neg.f64 (*.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)))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)) (/.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 a2 a2) (*.f64 a1 a1)) (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 (-.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 #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 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.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/2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal -1 binary64)))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.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 (*.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 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 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 a1 a1 (*.f64 a2 a2))
(fma.f64 #s(literal 1 binary64) (*.f64 a2 a2) (*.f64 a1 a1))
(fma.f64 (*.f64 #s(literal 1 binary64) a2) a2 (*.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 #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 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 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 a1 a1)) #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 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 a1 a2) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 a1 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 a2 a2) (*.f64 a1 a1))) #s(literal -1 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))))
(/.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.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 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1)) (-.f64 a1 a2))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 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 (*.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 #s(literal 1 binary64) (+.f64 a2 a1)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (-.f64 a1 a2) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(/.f64 (neg.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.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 (neg.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (+.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 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 a2 (*.f64 a2 (*.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 (neg.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.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 (*.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 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (neg.f64 (*.f64 (-.f64 a1 a2) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64))) (neg.f64 (+.f64 (*.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)))) #s(literal 1 binary64))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)))) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)))) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1)))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (neg.f64 (+.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 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(pow.f64 (/.f64 (-.f64 a1 a2) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1))) #s(literal -1 binary64))
(pow.f64 (/.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 a2 a2) (*.f64 a1 a1)))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 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 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)))
(*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal 1 binary64))
(*.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 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 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 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.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 a2 a1)) (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)))
(*.f64 (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.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 (*.f64 a2 a2) (*.f64 a1 a1))))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a2 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 a2 a1))
(+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(+.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(+.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a1 a1)))
(+.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a1 a1)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a2 a2)))
(+.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(+.f64 (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.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 a1))) #s(literal 1 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) #s(literal 1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.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 (*.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.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 a2 a2) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.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 a2 a2)) (*.f64 a2 a2)) (*.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 a1 a1) (*.f64 a1 a1) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(fma.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(fma.f64 (*.f64 a1 (*.f64 a1 a1)) a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(fma.f64 (*.f64 a1 (*.f64 a1 a1)) a1 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a2 a2) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a1 a1)))
(fma.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a1 a1) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(fma.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(fma.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(fma.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(fma.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (+.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)))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 #s(literal 1 binary64) (-.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 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 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.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 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 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 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 #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)))) #s(literal 1 binary64)) #s(literal 1 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 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (/.f64 #s(literal 1 binary64) (-.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 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (/.f64 #s(literal -1 binary64) (-.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 (neg.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.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 a1 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 1 binary64) (-.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 a2 a2) (*.f64 a1 a1)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.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 a2) (*.f64 a1 a1)) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 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 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 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 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 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 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (+.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 (neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal 1 binary64))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64))) (neg.f64 (*.f64 (+.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 (neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal -1 binary64))) (neg.f64 (*.f64 (-.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 (*.f64 a1 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 1 binary64) (-.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 (neg.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 a1 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 -1 binary64) (-.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 (neg.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (+.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (+.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)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (pow.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (*.f64 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 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal 3 binary64))) (+.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 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a1 a1)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a1 a1))) (*.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a1 a1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a1 a1)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a2 a2))) (*.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a1 a1)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a2 a2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #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 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (-.f64 (*.f64 a1 a1) (*.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 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(+.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(+.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(+.f64 (-.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 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(+.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(+.f64 (*.f64 (-.f64 a1 a2) a2) (*.f64 (-.f64 a1 a2) a1))
(+.f64 (*.f64 (-.f64 a1 a2) a1) (*.f64 (-.f64 a1 a2) a2))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(+.f64 (*.f64 a2 (-.f64 a1 a2)) (*.f64 a1 (-.f64 a1 a2)))
(+.f64 (*.f64 a1 (-.f64 a1 a2)) (*.f64 a2 (-.f64 a1 a2)))
(+.f64 (*.f64 (*.f64 (*.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 (*.f64 a2 a2) (*.f64 a1 a1))))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(-.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(-.f64 (/.f64 a1 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))) (/.f64 a2 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))))
(-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(-.f64 (/.f64 (*.f64 a1 a1) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) #s(literal 1 binary64)))
(-.f64 (/.f64 (/.f64 a1 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))) #s(literal 1 binary64)) (/.f64 (/.f64 a2 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))) #s(literal 1 binary64)))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) #s(literal 1 binary64)) (/.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) #s(literal 1 binary64)))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1)))) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))) (/.f64 (/.f64 (*.f64 a2 (*.f64 a2 a2)) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1)))) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 a1) (+.f64 a2 a1)) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))) (/.f64 (/.f64 (*.f64 a2 a2) (+.f64 a2 a1)) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 (/.f64 (*.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 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (+.f64 (*.f64 (*.f64 a1 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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (/.f64 (-.f64 (*.f64 (*.f64 a1 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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1))) (/.f64 (-.f64 a1 a2) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1))))
(-.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))) (/.f64 (*.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 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))))) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))))))
(fma.f64 a2 (-.f64 a1 a2) (*.f64 a1 (-.f64 a1 a2)))
(fma.f64 a1 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(fma.f64 a1 (-.f64 a1 a2) (*.f64 a2 (-.f64 a1 a2)))
(fma.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 #s(literal 1 binary64) (-.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 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(fma.f64 (+.f64 a2 a1) (-.f64 a1 a2) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (+.f64 a2 a1) (-.f64 a1 a2) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 (+.f64 a2 a1) (-.f64 a1 a2) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(fma.f64 (-.f64 a1 a2) a2 (*.f64 (-.f64 a1 a2) a1))
(fma.f64 (-.f64 a1 a2) a1 (*.f64 (-.f64 a1 a2) a2))
(fma.f64 (-.f64 a1 a2) (+.f64 a2 a1) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (-.f64 a1 a2) (+.f64 a2 a1) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 (-.f64 a1 a2) (+.f64 a2 a1) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(fma.f64 (*.f64 (*.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 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(fma.f64 (-.f64 (*.f64 (*.f64 a1 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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (-.f64 (*.f64 (*.f64 a1 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 a2 (*.f64 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 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 (-.f64 (*.f64 (*.f64 a1 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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(fma.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.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 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 #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 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(fma.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (-.f64 (*.f64 a1 a1) (*.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 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(fma.f64 (/.f64 (-.f64 a1 a2) #s(literal 1 binary64)) (+.f64 a2 a1) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (/.f64 (-.f64 a1 a2) #s(literal 1 binary64)) (+.f64 a2 a1) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 (/.f64 (-.f64 a1 a2) #s(literal 1 binary64)) (+.f64 a2 a1) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(fma.f64 (pow.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1/2 binary64)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (pow.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1/2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 (pow.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1/2 binary64)) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(fma.f64 (/.f64 (-.f64 a1 a2) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (/.f64 (-.f64 a1 a2) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 (/.f64 (-.f64 a1 a2) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(fma.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(fma.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(fma.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 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 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 a1 a2) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 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 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.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 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64))
(/.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1)))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (-.f64 a2 a1)))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (+.f64 a2 a1) (+.f64 (*.f64 a1 a1) (*.f64 a2 (-.f64 a2 a1)))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 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 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (*.f64 (-.f64 a1 a2) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 a1 a2))
(/.f64 (neg.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)))
(/.f64 (/.f64 (-.f64 a1 a2) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)))
(/.f64 (*.f64 (-.f64 a1 a2) (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (-.f64 a2 a1))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.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 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 a2 a1)) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 a2 a1)) (+.f64 a2 a1))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (-.f64 (*.f64 a1 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) a2)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (/.f64 (-.f64 a1 a2) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (-.f64 a2 a1))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (*.f64 (+.f64 a2 a1) (+.f64 (*.f64 a1 a1) (*.f64 a2 (-.f64 a2 a1))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))) (neg.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (neg.f64 (*.f64 (-.f64 a1 a2) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(/.f64 (neg.f64 (*.f64 (-.f64 a1 a2) (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 (-.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))) (neg.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 a2 a1))) (neg.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 a2 a1))) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)))
(/.f64 (+.f64 (pow.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 a1 a2) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 a1 a2) a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 a1 a2) a2) (*.f64 (-.f64 a1 a2) a2)) (-.f64 (*.f64 (*.f64 (-.f64 a1 a2) a1) (*.f64 (-.f64 a1 a2) a1)) (*.f64 (*.f64 (-.f64 a1 a2) a2) (*.f64 (-.f64 a1 a2) a1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 a1 a2) a1) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 a1 a2) a2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 a1 a2) a1) (*.f64 (-.f64 a1 a2) a1)) (-.f64 (*.f64 (*.f64 (-.f64 a1 a2) a2) (*.f64 (-.f64 a1 a2) a2)) (*.f64 (*.f64 (-.f64 a1 a2) a1) (*.f64 (-.f64 a1 a2) a2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 #s(literal 0 binary64) (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 a2 (-.f64 a1 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 a1 (-.f64 a1 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a2 (-.f64 a1 a2)) (*.f64 a2 (-.f64 a1 a2))) (-.f64 (*.f64 (*.f64 a1 (-.f64 a1 a2)) (*.f64 a1 (-.f64 a1 a2))) (*.f64 (*.f64 a2 (-.f64 a1 a2)) (*.f64 a1 (-.f64 a1 a2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 a1 (-.f64 a1 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 a2 (-.f64 a1 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 (-.f64 a1 a2)) (*.f64 a1 (-.f64 a1 a2))) (-.f64 (*.f64 (*.f64 a2 (-.f64 a1 a2)) (*.f64 a2 (-.f64 a1 a2))) (*.f64 (*.f64 a1 (-.f64 a1 a2)) (*.f64 a2 (-.f64 a1 a2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.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 (*.f64 a2 a2) (*.f64 a1 a1))))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.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 (*.f64 a2 a2) (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.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 (*.f64 a2 a2) (*.f64 a1 a1)))))))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))) (*.f64 (*.f64 (*.f64 (*.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 (*.f64 a2 a2) (*.f64 a1 a1))))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.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 a2 (*.f64 a2 (+.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))
(pow.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64))
(pow.f64 (pow.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64))
(pow.f64 (exp.f64 (log.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 a2 a1) (-.f64 a1 a2))
(*.f64 (-.f64 a1 a2) (+.f64 a2 a1))
(*.f64 (-.f64 (*.f64 (*.f64 a1 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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (/.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 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 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 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (/.f64 (-.f64 a1 a2) #s(literal 1 binary64)) (+.f64 a2 a1))
(*.f64 (pow.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 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 a2) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(*.f64 (pow.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1)))))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)))
(*.f64 th (*.f64 th #s(literal -1/2 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(*.f64 (*.f64 th th) #s(literal -1/2 binary64))
(*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64))
(*.f64 (*.f64 th #s(literal -1/2 binary64)) th)
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 th th)) #s(literal -1/2 binary64))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 th #s(literal -1/2 binary64))) th)
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(+.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal 0 binary64)) (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(+.f64 (*.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(+.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(+.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(fma.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(fma.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(fma.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal 0 binary64) (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(fma.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)))
(neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 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 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 a2 (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 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 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 a2 a2)))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.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 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a2 a2)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (*.f64 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 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (*.f64 a2 a2) (+.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 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 a2))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 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 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 (*.f64 a1 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 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 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a2 a2))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 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 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 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 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 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 a2 a2))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.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)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 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 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (*.f64 (*.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 (-.f64 #s(literal 0 binary64) (*.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 a2 a2) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (+.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) (*.f64 a2 a2)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 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 a2 a2)))) (neg.f64 (+.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)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal 0 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal 0 binary64))) (-.f64 (*.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal 0 binary64)) (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 (*.f64 #s(literal 0 binary64) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))))
(*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(exp.f64 (*.f64 (log.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (neg.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64))))
(-.f64 #s(literal 0 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 a1 (*.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 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 a1 (*.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 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 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 a1) (*.f64 a2 a2))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))) (/.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)))
(-.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(neg.f64 (/.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2)))
(/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)) (-.f64 a1 a2))))
(/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (-.f64 a1 a2) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)))))
(/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 a1 a2))
(/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (/.f64 #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 a1)) (-.f64 a1 a2)))
(/.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal -1 binary64) (*.f64 (-.f64 a1 a2) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))
(/.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 a1 a2)))))
(/.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)) (+.f64 a2 a1))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) #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 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 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 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 a1 a2))) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 a2))) (-.f64 #s(literal 0 binary64) (+.f64 a2 a1)))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 a2 a1))))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))
(pow.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 #s(literal 1 binary64) (+.f64 a2 a1)) (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 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 a1) (*.f64 a2 a2))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 a1 a2))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)) (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (+.f64 a2 a1))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 a2 a1))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.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 (*.f64 a2 a2) (*.f64 a1 a1)))))) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (pow.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (pow.f64 (/.f64 (-.f64 a1 a2) #s(literal -1 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (+.f64 a2 a1)))
(*.f64 (pow.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (pow.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(+.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (/.f64 (*.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 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(-.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(fma.f64 a2 (neg.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (neg.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (neg.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)) (neg.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 a1) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 a1) (neg.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(fma.f64 (*.f64 a2 (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 #s(literal -1 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(fma.f64 (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(fma.f64 (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 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 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(fma.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (+.f64 (*.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(fma.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 a2) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(fma.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(fma.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) a1 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(fma.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) a1 (neg.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 a2))) a2) (*.f64 a2 a2) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 a2)) a2 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 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 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 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 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))) (neg.f64 (neg.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))) (neg.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (-.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (pow.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 3 binary64))) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (-.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (pow.f64 (+.f64 (*.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 (*.f64 (+.f64 (*.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (pow.f64 (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 (*.f64 (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))) (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (+.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (+.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(pow.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 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 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 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 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2))))
(*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))

simplify292.0ms (2.8%)

Algorithm
1×egg-herbie
Rules
3370×*-lowering-*.f32
3370×*-lowering-*.f64
2994×+-lowering-+.f64
2994×+-lowering-+.f32
1330×--lowering--.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
010127266
137044990
0103504990
Stop Event
1×iter limit
1×node limit
Counts
432 → 432
Calls
Call 1
Inputs
(/ (* (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)
1
(+ 1 (* -1/2 (pow th 2)))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ a1 (sqrt 2))
(/ (* (pow 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))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(pow a2 2)
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(* -1/2 (* (pow a2 2) (pow th 2)))
(* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))
(* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))
(* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))
(* -1/2 (* (pow a2 2) (pow th 2)))
(* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))
(* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))
(* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))
1
(+ 1 (* -1/2 (pow th 2)))
(+ 1 (* -1/2 (pow th 2)))
(+ 1 (* -1/2 (pow th 2)))
(* -1/2 (pow th 2))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(* -1/2 (pow th 2))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(/ (pow a2 2) (sqrt 2))
(+ (* a1 (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (/ (pow a2 2) (sqrt 2)))
(+ (* a1 (+ (* -1 (/ a2 (sqrt 2))) (+ (* a1 (+ (* 2 (/ 1 (sqrt 2))) (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (pow a2 2)))) (/ a2 (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(+ (* a1 (+ (* -1 (/ a2 (sqrt 2))) (+ (* a1 (+ (* 2 (/ 1 (sqrt 2))) (+ (/ (* a1 (* (+ a2 (* -1 a2)) (+ (* 2 (/ 1 (sqrt 2))) (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (pow a2 2))))) (pow a2 2)) (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (pow a2 2))))) (/ a2 (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(* -1 (/ (pow a2 2) (sqrt 2)))
(+ (* -1 (/ (pow a2 2) (sqrt 2))) (/ (* (pow a2 2) (+ a2 (* -1 a2))) (* a1 (sqrt 2))))
(+ (* -1 (/ (- (/ (pow a2 4) (sqrt 2)) (+ (* -1 (/ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (sqrt 2))) (* -1 (/ (pow a2 4) (sqrt 2))))) (pow a1 2))) (+ (* -1 (/ (pow a2 2) (sqrt 2))) (/ (* (pow a2 2) (+ a2 (* -1 a2))) (* a1 (sqrt 2)))))
(+ (* -1 (/ (- (/ (pow a2 4) (sqrt 2)) (+ (* -1 (/ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (sqrt 2))) (* -1 (/ (pow a2 4) (sqrt 2))))) (pow a1 2))) (+ (* -1 (/ (pow a2 2) (sqrt 2))) (+ (/ (* (+ a2 (* -1 a2)) (- (/ (pow a2 4) (sqrt 2)) (+ (* -1 (/ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (sqrt 2))) (* -1 (/ (pow a2 4) (sqrt 2)))))) (pow a1 3)) (+ (/ (* (pow a2 2) (+ a2 (* -1 a2))) (* a1 (sqrt 2))) (/ (* (pow a2 4) (+ a2 (* -1 a2))) (* (pow a1 3) (sqrt 2)))))))
(* -1 (/ (pow a2 2) (sqrt 2)))
(+ (* -1 (/ (pow a2 2) (sqrt 2))) (/ (* (pow a2 2) (+ a2 (* -1 a2))) (* a1 (sqrt 2))))
(+ (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow a2 4) (sqrt 2))) (+ (/ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (sqrt 2)) (/ (pow a2 4) (sqrt 2)))) a1)) (/ (* (pow a2 2) (+ a2 (* -1 a2))) (sqrt 2))) a1)) (* -1 (/ (pow a2 2) (sqrt 2))))
(+ (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a2 (* -1 a2)) (- (* -1 (/ (pow a2 4) (sqrt 2))) (+ (/ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (sqrt 2)) (/ (pow a2 4) (sqrt 2))))) a1)) (+ (* -1 (/ (pow a2 4) (sqrt 2))) (/ (* (pow a2 4) (+ a2 (* -1 a2))) (* a1 (sqrt 2))))) (+ (/ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (sqrt 2)) (/ (pow a2 4) (sqrt 2)))) a1)) (/ (* (pow a2 2) (+ a2 (* -1 a2))) (sqrt 2))) a1)) (* -1 (/ (pow a2 2) (sqrt 2))))
(* -1 (/ (pow a2 2) (sqrt 2)))
(* (pow a2 2) (- (* -2 (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (/ 1 (sqrt 2))))
(* (pow a2 2) (- (* (pow a2 2) (- (* 2 (/ (* a2 (+ a1 (* -1 a1))) (* (pow a1 4) (sqrt 2)))) (* 2 (/ 1 (* (pow a1 2) (sqrt 2)))))) (/ 1 (sqrt 2))))
(* (pow a2 2) (- (* (pow a2 2) (- (* a2 (+ (* -1 (* a2 (- (* 2 (/ 1 (* (pow a1 4) (sqrt 2)))) (* -2 (/ (pow (+ a1 (* -1 a1)) 2) (* (pow a1 6) (sqrt 2))))))) (* 2 (/ (+ a1 (* -1 a1)) (* (pow a1 4) (sqrt 2)))))) (* 2 (/ 1 (* (pow a1 2) (sqrt 2)))))) (/ 1 (sqrt 2))))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (* -1 (/ a1 (* a2 (sqrt 2)))) (+ (/ 1 (sqrt 2)) (/ a1 (* a2 (sqrt 2))))))
(* (pow a2 2) (+ (* -1 (/ a1 (* a2 (sqrt 2)))) (+ (* -1 (/ (- (* -1 (/ (pow a1 2) (sqrt 2))) (+ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2)))) (pow a2 2))) (+ (/ 1 (sqrt 2)) (/ a1 (* a2 (sqrt 2)))))))
(* (pow a2 2) (+ (* -1 (/ a1 (* a2 (sqrt 2)))) (+ (* -1 (/ (* (+ a1 (* -1 a1)) (- (* -1 (/ (pow a1 2) (sqrt 2))) (+ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2))))) (pow a2 3))) (+ (* -1 (/ (- (* -1 (/ (pow a1 2) (sqrt 2))) (+ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2)))) (pow a2 2))) (+ (/ 1 (sqrt 2)) (+ (/ a1 (* a2 (sqrt 2))) (/ (* (pow a1 2) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (pow a2 3))))))))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (* -1 (/ (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))) a2)) (/ 1 (sqrt 2))))
(* (pow a2 2) (+ (* -1 (/ (- (+ (* -1 (/ a1 (sqrt 2))) (+ (* -1 (/ (pow a1 2) (* a2 (sqrt 2)))) (/ a1 (sqrt 2)))) (+ (/ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) a2) (/ (pow a1 2) (* a2 (sqrt 2))))) a2)) (/ 1 (sqrt 2))))
(* (pow a2 2) (+ (* -1 (/ (+ (* -1 (/ a1 (sqrt 2))) (+ (* -1 (/ (+ (* -1 (- (* -1 (/ (pow a1 2) (sqrt 2))) (+ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2))))) (* -1 (/ (+ (* -1 (* (+ a1 (* -1 a1)) (- (* -1 (/ (pow a1 2) (sqrt 2))) (+ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2)))))) (* (pow a1 2) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) a2))) a2)) (/ a1 (sqrt 2)))) a2)) (/ 1 (sqrt 2))))
(pow a2 2)
(+ (* a1 (+ a2 (* -1 a2))) (pow a2 2))
(+ (* a1 (+ a2 (+ (* -1 a2) (* a1 (+ 2 (/ (pow (+ a2 (* -1 a2)) 2) (pow a2 2))))))) (pow a2 2))
(+ (* a1 (+ a2 (+ (* -1 a2) (* a1 (+ 2 (+ (/ (* a1 (* (+ 2 (/ (pow (+ a2 (* -1 a2)) 2) (pow a2 2))) (+ a2 (* -1 a2)))) (pow a2 2)) (/ (pow (+ a2 (* -1 a2)) 2) (pow a2 2)))))))) (pow a2 2))
(* -1 (pow a2 2))
(+ (* -1 (pow a2 2)) (/ (* (pow a2 2) (+ a2 (* -1 a2))) a1))
(+ (* -1 (/ (- (pow a2 4) (+ (* -1 (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2))) (* -1 (pow a2 4)))) (pow a1 2))) (+ (* -1 (pow a2 2)) (/ (* (pow a2 2) (+ a2 (* -1 a2))) a1)))
(+ (* -1 (/ (- (pow a2 4) (+ (* -1 (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2))) (* -1 (pow a2 4)))) (pow a1 2))) (+ (* -1 (pow a2 2)) (+ (/ (* (+ a2 (* -1 a2)) (- (pow a2 4) (+ (* -1 (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2))) (* -1 (pow a2 4))))) (pow a1 3)) (+ (/ (* (pow a2 2) (+ a2 (* -1 a2))) a1) (/ (* (pow a2 4) (+ a2 (* -1 a2))) (pow a1 3))))))
(* -1 (pow a2 2))
(+ (* -1 (pow a2 2)) (/ (* (pow a2 2) (+ a2 (* -1 a2))) a1))
(+ (* -1 (/ (- (* -1 (/ (- (* -1 (pow a2 4)) (+ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (pow a2 4))) a1)) (* (pow a2 2) (+ a2 (* -1 a2)))) a1)) (* -1 (pow a2 2)))
(+ (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a2 (* -1 a2)) (- (* -1 (pow a2 4)) (+ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (pow a2 4)))) a1)) (+ (* -1 (pow a2 4)) (/ (* (pow a2 4) (+ a2 (* -1 a2))) a1))) (+ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (pow a2 4))) a1)) (* (pow a2 2) (+ a2 (* -1 a2)))) a1)) (* -1 (pow a2 2)))
(* -1 (pow a2 2))
(* (pow a2 2) (- (* -2 (/ (pow a2 2) (pow a1 2))) 1))
(* (pow a2 2) (- (* (pow a2 2) (- (* 2 (/ (* a2 (+ a1 (* -1 a1))) (pow a1 4))) (* 2 (/ 1 (pow a1 2))))) 1))
(* (pow a2 2) (- (* (pow a2 2) (- (* a2 (+ (* -1 (* a2 (- (* 2 (/ 1 (pow a1 4))) (* -2 (/ (pow (+ a1 (* -1 a1)) 2) (pow a1 6)))))) (* 2 (/ (+ a1 (* -1 a1)) (pow a1 4))))) (* 2 (/ 1 (pow a1 2))))) 1))
(pow a2 2)
(* (pow a2 2) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2))))
(* (pow a2 2) (+ 1 (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (- (* -1 (pow a1 2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) (pow a2 2))) (/ a1 a2)))))
(* (pow a2 2) (+ 1 (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (* (+ a1 (* -1 a1)) (- (* -1 (pow a1 2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2)))) (pow a2 3))) (+ (* -1 (/ (- (* -1 (pow a1 2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) (pow a2 2))) (+ (/ a1 a2) (/ (* (pow a1 2) (+ a1 (* -1 a1))) (pow a2 3))))))))
(pow a2 2)
(* (pow a2 2) (+ 1 (* -1 (/ (+ a1 (* -1 a1)) a2))))
(* (pow a2 2) (+ 1 (* -1 (/ (- (+ a1 (+ (* -1 a1) (* -1 (/ (pow a1 2) a2)))) (+ (/ (pow a1 2) a2) (/ (pow (+ a1 (* -1 a1)) 2) a2))) a2))))
(* (pow a2 2) (+ 1 (* -1 (/ (+ a1 (+ (* -1 a1) (* -1 (/ (+ (* -1 (- (* -1 (pow a1 2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2)))) (* -1 (/ (+ (* -1 (* (+ a1 (* -1 a1)) (- (* -1 (pow a1 2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))))) (* (pow a1 2) (+ a1 (* -1 a1)))) a2))) a2)))) a2))))
(/ -1 (pow a2 2))
(- (* -1 (/ (pow a1 2) (pow a2 4))) (/ 1 (pow a2 2)))
(- (* (pow a1 2) (- (* -1 (/ (pow a1 2) (pow a2 6))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))
(- (* (pow a1 2) (- (* (pow a1 2) (- (* -1 (/ (pow a1 2) (pow a2 8))) (/ 1 (pow a2 6)))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))
(/ 1 (pow a1 2))
(/ (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))) (pow a1 2))
(/ (- (+ 1 (* -1 (/ (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2))) (pow a1 2)))) (+ (* -1 (/ a2 a1)) (/ a2 a1))) (pow a1 2))
(/ (- (+ 1 (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2))))) (* (pow a2 2) (+ a2 (* -1 a2)))) (pow a1 3)))) (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a1 2))) (/ a2 a1))))) (pow a1 2))
(/ 1 (pow a1 2))
(/ (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))) (pow a1 2))
(/ (+ 1 (* -1 (/ (- (+ (* -1 (/ (pow a2 2) a1)) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) a1))) (* -1 (+ a2 (* -1 a2)))) a1))) (pow a1 2))
(/ (+ 1 (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (pow a2 2) (+ a2 (* -1 a2))) a1)) (/ (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2)))) a1)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2)))) a1)) (* -1 (+ a2 (* -1 a2)))) a1))) (pow a1 2))
(/ 1 (pow a1 2))
(+ (/ 1 (pow a1 2)) (/ (pow a2 2) (pow a1 4)))
(+ (* (pow a2 2) (+ (/ 1 (pow a1 4)) (/ (pow a2 2) (pow a1 6)))) (/ 1 (pow a1 2)))
(+ (* (pow a2 2) (+ (* (pow a2 2) (+ (/ 1 (pow a1 6)) (/ (pow a2 2) (pow a1 8)))) (/ 1 (pow a1 4)))) (/ 1 (pow a1 2)))
(/ -1 (pow a2 2))
(/ (- (* -1 (/ (+ a1 (* -1 a1)) a2)) 1) (pow a2 2))
(/ (- (* -1 (/ (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2)) (pow a2 2))) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2)))) (pow a2 2))
(/ (- (* -1 (/ (+ (* (+ a1 (* -1 a1)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) (* (pow a1 2) (+ a1 (* -1 a1)))) (pow a2 3))) (+ 1 (+ (* -1 (/ a1 a2)) (+ (/ a1 a2) (+ (/ (pow a1 2) (pow a2 2)) (/ (pow (+ a1 (* -1 a1)) 2) (pow a2 2))))))) (pow a2 2))
(/ -1 (pow a2 2))
(/ (- (+ (* -1 (/ a1 a2)) (/ a1 a2)) 1) (pow a2 2))
(/ (- (* -1 (/ (- (+ (/ (pow a1 2) a2) (/ (pow (+ a1 (* -1 a1)) 2) a2)) (+ a1 (* -1 a1))) a2)) 1) (pow a2 2))
(/ (- (* -1 (/ (- (* -1 (/ (- (+ (/ (* (+ a1 (* -1 a1)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) a2) (/ (* (pow a1 2) (+ a1 (* -1 a1))) a2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) a2)) (+ a1 (* -1 a1))) a2)) 1) (pow a2 2))
(/ 1 a2)
(+ (* -1 (/ a1 (pow a2 2))) (/ 1 a2))
(+ (* a1 (- (/ a1 (pow a2 3)) (/ 1 (pow a2 2)))) (/ 1 a2))
(+ (* a1 (- (* a1 (+ (* -1 (/ a1 (pow a2 4))) (/ 1 (pow a2 3)))) (/ 1 (pow a2 2)))) (/ 1 a2))
(/ 1 a1)
(/ (+ 1 (* -1 (/ a2 a1))) a1)
(/ (- (+ 1 (/ (pow a2 2) (pow a1 2))) (/ a2 a1)) a1)
(/ (- (+ 1 (* -1 (/ (pow a2 3) (pow a1 3)))) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (/ a2 a1))) a1)
(/ 1 a1)
(* -1 (/ (- (/ a2 a1) 1) a1))
(* -1 (/ (- (* -1 (/ (- (/ (pow a2 2) a1) a2) a1)) 1) a1))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow a2 3) a1) (pow a2 2)) a1)) a2) a1)) 1) a1))
(/ 1 a1)
(+ (* -1 (/ a2 (pow a1 2))) (/ 1 a1))
(+ (* a2 (- (/ a2 (pow a1 3)) (/ 1 (pow a1 2)))) (/ 1 a1))
(+ (* a2 (- (* a2 (+ (* -1 (/ a2 (pow a1 4))) (/ 1 (pow a1 3)))) (/ 1 (pow a1 2)))) (/ 1 a1))
(/ 1 a2)
(/ (+ 1 (* -1 (/ a1 a2))) a2)
(/ (- (+ 1 (/ (pow a1 2) (pow a2 2))) (/ a1 a2)) a2)
(/ (- (+ 1 (* -1 (/ (pow a1 3) (pow a2 3)))) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (/ a1 a2))) a2)
(/ 1 a2)
(* -1 (/ (- (/ a1 a2) 1) a2))
(* -1 (/ (- (* -1 (/ (- (/ (pow a1 2) a2) a1) a2)) 1) a2))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow a1 3) a2) (pow a1 2)) a2)) a1) a2)) 1) a2))
(/ (pow a2 2) (sqrt 2))
(+ (/ (* a1 (+ (* -1 (pow a2 5)) (pow a2 5))) (* (pow a2 4) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(+ (* a1 (- (* a1 (- (/ 1 (sqrt 2)) (+ (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (* (pow a2 4) (sqrt 2)))) (* -1 (/ (pow (+ (* -1 (pow a2 5)) (pow a2 5)) 2) (* (pow a2 10) (sqrt 2))))))) (* -1 (/ (+ (* -1 (pow a2 5)) (pow a2 5)) (* (pow a2 4) (sqrt 2)))))) (/ (pow a2 2) (sqrt 2)))
(+ (* a1 (- (* a1 (- (+ (* -1 (* a1 (+ (* -1 (/ (* (+ (* -1 (pow a2 4)) (pow a2 4)) (+ (* -1 (pow a2 5)) (pow a2 5))) (* (pow a2 10) (sqrt 2)))) (+ (* -1 (/ (* (+ (* -1 (pow a2 5)) (pow a2 5)) (- (/ 1 (sqrt 2)) (+ (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (* (pow a2 4) (sqrt 2)))) (* -1 (/ (pow (+ (* -1 (pow a2 5)) (pow a2 5)) 2) (* (pow a2 10) (sqrt 2))))))) (pow a2 6))) (* -1 (/ (+ (* -1 (pow a2 3)) (pow a2 3)) (* (pow a2 4) (sqrt 2)))))))) (/ 1 (sqrt 2))) (+ (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (* (pow a2 4) (sqrt 2)))) (* -1 (/ (pow (+ (* -1 (pow a2 5)) (pow a2 5)) 2) (* (pow a2 10) (sqrt 2))))))) (* -1 (/ (+ (* -1 (pow a2 5)) (pow a2 5)) (* (pow a2 4) (sqrt 2)))))) (/ (pow a2 2) (sqrt 2)))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))) a1)) (/ 1 (sqrt 2))))
(* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))))) (* -1 (/ (pow a2 2) (sqrt 2)))) (pow a1 2))) (/ 1 (sqrt 2))) (+ (* -1 (/ a2 (* a1 (sqrt 2)))) (/ a2 (* a1 (sqrt 2))))))
(* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))))) (* -1 (/ (pow a2 2) (sqrt 2)))))) (+ (* -1 (* (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))) (+ (* -1 (pow a2 2)) (pow a2 2)))) (+ (* -1 (/ (pow a2 3) (sqrt 2))) (/ (pow a2 3) (sqrt 2))))) (pow a1 3))) (/ 1 (sqrt 2))) (+ (* -1 (/ a2 (* a1 (sqrt 2)))) (+ (* -1 (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (pow a1 2))) (+ (* -1 (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (/ a2 (* a1 (sqrt 2))))))))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))) a1)) (/ 1 (sqrt 2))))
(* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (+ (* -1 (/ (+ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (/ (pow a2 2) (sqrt 2))) a1)) (/ a2 (sqrt 2)))) a1)) (/ 1 (sqrt 2))))
(* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (pow a2 3) (sqrt 2))) (+ (* (+ a2 (* -1 a2)) (+ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (/ (pow a2 2) (sqrt 2)))) (+ (* (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))) (+ (* -1 (pow a2 2)) (pow a2 2))) (/ (pow a2 3) (sqrt 2))))) a1)) (+ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (/ (pow a2 2) (sqrt 2)))) a1)) (/ a2 (sqrt 2)))) a1)) (/ 1 (sqrt 2))))
(/ (pow a1 2) (sqrt 2))
(+ (* -1 (* a2 (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))
(+ (* a2 (- (* a2 (- (/ 1 (sqrt 2)) (* -1 (/ (* (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))) (+ (* -1 (pow a1 5)) (pow a1 5))) (pow a1 6))))) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))
(+ (* a2 (- (* a2 (- (+ (* -1 (* a2 (+ (* -1 (/ (* (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))) (+ (* -1 (pow a1 4)) (pow a1 4))) (pow a1 6))) (/ (* (+ (* -1 (pow a1 5)) (pow a1 5)) (- (/ 1 (sqrt 2)) (* -1 (/ (* (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))) (+ (* -1 (pow a1 5)) (pow a1 5))) (pow a1 6))))) (pow a1 6))))) (/ 1 (sqrt 2))) (* -1 (/ (* (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))) (+ (* -1 (pow a1 5)) (pow a1 5))) (pow a1 6))))) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (* -1 (/ a1 (* a2 (sqrt 2)))) (+ (/ 1 (sqrt 2)) (/ a1 (* a2 (sqrt 2))))))
(* (pow a2 2) (- (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (+ a1 (* -1 a1)) (* a2 (sqrt 2)))) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (* (pow a2 2) (sqrt 2)))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (* (pow a2 2) (sqrt 2))))))))
(* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (* (+ a1 (* -1 a1)) (- (/ (pow a1 2) (sqrt 2)) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2))))))) (+ (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 2)) (pow a1 2))) (sqrt 2))) (* -1 (/ (+ (* -1 (pow a1 3)) (pow a1 3)) (sqrt 2))))) (pow a2 3))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (+ (* -1 (/ (+ a1 (* -1 a1)) (* a2 (sqrt 2)))) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (* (pow a2 2) (sqrt 2)))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (* (pow a2 2) (sqrt 2))))))))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (* -1 (/ (+ a1 (* -1 a1)) (* a2 (sqrt 2)))) (/ 1 (sqrt 2))))
(* (pow a2 2) (+ (* -1 (/ (- (* -1 (/ (- (/ (pow a1 2) (sqrt 2)) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2))))) a2)) (* -1 (/ (+ a1 (* -1 a1)) (sqrt 2)))) a2)) (/ 1 (sqrt 2))))
(* (pow a2 2) (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 2)) (pow a1 2))) (* a2 (sqrt 2)))) (+ (* -1 (/ (* (+ a1 (* -1 a1)) (- (/ (pow a1 2) (sqrt 2)) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2)))))) a2)) (+ (* -1 (/ (+ (* -1 (pow a1 3)) (pow a1 3)) (* a2 (sqrt 2)))) (/ (pow a1 2) (sqrt 2))))) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2))))) a2)) (* -1 (/ (+ a1 (* -1 a1)) (sqrt 2)))) a2)) (/ 1 (sqrt 2))))
(pow a2 2)
(+ (/ (* a1 (+ (* -1 (pow a2 5)) (pow a2 5))) (pow a2 4)) (pow a2 2))
(+ (* a1 (- (* a1 (- 1 (+ (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (pow a2 4))) (* -1 (/ (pow (+ (* -1 (pow a2 5)) (pow a2 5)) 2) (pow a2 10)))))) (* -1 (/ (+ (* -1 (pow a2 5)) (pow a2 5)) (pow a2 4))))) (pow a2 2))
(+ (* a1 (- (* a1 (- (+ 1 (* -1 (* a1 (+ (* -1 (/ (* (+ (* -1 (pow a2 4)) (pow a2 4)) (+ (* -1 (pow a2 5)) (pow a2 5))) (pow a2 10))) (+ (* -1 (/ (* (+ (* -1 (pow a2 5)) (pow a2 5)) (- 1 (+ (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (pow a2 4))) (* -1 (/ (pow (+ (* -1 (pow a2 5)) (pow a2 5)) 2) (pow a2 10)))))) (pow a2 6))) (* -1 (/ (+ (* -1 (pow a2 3)) (pow a2 3)) (pow a2 4)))))))) (+ (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (pow a2 4))) (* -1 (/ (pow (+ (* -1 (pow a2 5)) (pow a2 5)) 2) (pow a2 10)))))) (* -1 (/ (+ (* -1 (pow a2 5)) (pow a2 5)) (pow a2 4))))) (pow a2 2))
(pow a1 2)
(* (pow a1 2) (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))))
(* (pow a1 2) (- (+ 1 (* -1 (/ (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2))) (pow a1 2)))) (+ (* -1 (/ a2 a1)) (/ a2 a1))))
(* (pow a1 2) (- (+ 1 (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2))))) (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (pow a2 2)))) (+ (* -1 (pow a2 3)) (pow a2 3)))) (pow a1 3)))) (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a1 2))) (/ a2 a1))))))
(pow a1 2)
(* (pow a1 2) (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))))
(* (pow a1 2) (+ 1 (* -1 (/ (+ a2 (+ (* -1 a2) (* -1 (/ (+ (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) a1)))) a1))))
(* (pow a1 2) (+ 1 (* -1 (/ (+ a2 (+ (* -1 a2) (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow a2 3)) (+ (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (pow a2 2))) (+ (* (+ a2 (* -1 a2)) (+ (pow a2 2) (pow (+ a2 (* -1 a2)) 2))) (pow a2 3)))) a1)) (+ (pow a2 2) (pow (+ a2 (* -1 a2)) 2))) a1)))) a1))))
(pow a1 2)
(+ (* -1 (* a2 (+ a1 (* -1 a1)))) (pow a1 2))
(+ (* a2 (- (* a2 (- 1 (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 5)) (pow a1 5))) (pow a1 6))))) (+ a1 (* -1 a1)))) (pow a1 2))
(+ (* a2 (- (* a2 (- (+ 1 (* -1 (* a2 (+ (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 4)) (pow a1 4))) (pow a1 6))) (/ (* (+ (* -1 (pow a1 5)) (pow a1 5)) (- 1 (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 5)) (pow a1 5))) (pow a1 6))))) (pow a1 6)))))) (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 5)) (pow a1 5))) (pow a1 6))))) (+ a1 (* -1 a1)))) (pow a1 2))
(pow a2 2)
(* (pow a2 2) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2))))
(* (pow a2 2) (- (+ 1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (+ a1 (* -1 a1)) a2)) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (pow a2 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (pow a2 2)))))))
(* (pow a2 2) (- (+ 1 (+ (* -1 (/ (+ (* -1 (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 2)) (pow a1 2)))) (+ (* -1 (* (+ a1 (* -1 a1)) (- (pow a1 2) (+ (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (* -1 (pow (+ a1 (* -1 a1)) 2)))))) (* -1 (+ (* -1 (pow a1 3)) (pow a1 3))))) (pow a2 3))) (/ (pow a1 2) (pow a2 2)))) (+ (* -1 (/ (+ a1 (* -1 a1)) a2)) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (pow a2 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (pow a2 2)))))))
(pow a2 2)
(* (pow a2 2) (+ 1 (* -1 (/ (+ a1 (* -1 a1)) a2))))
(* (pow a2 2) (+ 1 (* -1 (/ (- (* -1 (/ (- (pow a1 2) (+ (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (* -1 (pow (+ a1 (* -1 a1)) 2)))) a2)) (* -1 (+ a1 (* -1 a1)))) a2))))
(* (pow a2 2) (+ 1 (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 2)) (pow a1 2))) a2)) (+ (* -1 (/ (* (+ a1 (* -1 a1)) (- (pow a1 2) (+ (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (* -1 (pow (+ a1 (* -1 a1)) 2))))) a2)) (+ (* -1 (/ (+ (* -1 (pow a1 3)) (pow a1 3)) a2)) (pow a1 2)))) (+ (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (* -1 (pow (+ a1 (* -1 a1)) 2)))) a2)) (* -1 (+ a1 (* -1 a1)))) a2))))
(* -1 (pow a2 4))
(+ (* -1 (pow a2 4)) (pow a1 4))
(+ (* -1 (pow a2 4)) (pow a1 4))
(+ (* -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)
(* (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))
(+ (* -1 (pow a2 2)) (pow a1 2))
(+ (* -1 (pow a2 2)) (pow a1 2))
(+ (* -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 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (pow a1 4)))) (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (- (+ 1 (/ (* (pow a2 2) (+ (* -1 (pow a2 4)) (pow a2 4))) (pow a1 6))) (+ (* -1 (/ (pow a2 4) (pow a1 4))) (+ (/ (pow a2 2) (pow a1 2)) (/ (pow a2 4) (pow a1 4))))))
(pow a1 2)
(* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 2) (- (+ 1 (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (pow a1 4)))) (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (- (+ 1 (/ (* (pow a2 2) (+ (* -1 (pow a2 4)) (pow a2 4))) (pow a1 6))) (+ (* -1 (/ (pow a2 4) (pow a1 4))) (+ (/ (pow a2 2) (pow a1 2)) (/ (pow a2 4) (pow a1 4))))))
(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) (- (* -1 (/ (+ (* -1 (pow a1 4)) (pow a1 4)) (pow a2 4))) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))))
(* (pow a2 2) (- (/ (* (pow a1 2) (+ (* -1 (pow a1 4)) (pow a1 4))) (pow a2 6)) (+ 1 (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (pow a1 4) (pow a2 4))) (/ (pow a1 4) (pow a2 4)))))))
(* -1 (pow a2 2))
(* (pow a2 2) (- (/ (pow a1 2) (pow a2 2)) 1))
(* (pow a2 2) (- (* -1 (/ (+ (* -1 (pow a1 4)) (pow a1 4)) (pow a2 4))) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))))
(* (pow a2 2) (- (/ (* (pow a1 2) (+ (* -1 (pow a1 4)) (pow a1 4))) (pow a2 6)) (+ 1 (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (pow a1 4) (pow a2 4))) (/ (pow a1 4) (pow a2 4)))))))
(* -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))
(+ (* -1 (* (pow a1 2) (pow a2 2))) (* -1 (pow a2 4)))
(+ (* -1 (* (pow a1 2) (pow a2 2))) (* -1 (pow a2 4)))
(+ (* -1 (* (pow a1 2) (pow a2 2))) (* -1 (pow a2 4)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* (pow a1 2) (+ (* -1 (/ (pow a2 4) (pow a1 2))) (* -1 (pow a2 2))))
(* (pow a1 2) (+ (* -1 (/ (pow a2 4) (pow a1 2))) (* -1 (pow a2 2))))
(* (pow a1 2) (+ (* -1 (/ (pow a2 4) (pow a1 2))) (* -1 (pow a2 2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(* (pow a1 2) (+ (* -1 (/ (pow a2 4) (pow a1 2))) (* -1 (pow a2 2))))
(* (pow a1 2) (+ (* -1 (/ (pow a2 4) (pow a1 2))) (* -1 (pow a2 2))))
(* (pow a1 2) (+ (* -1 (/ (pow a2 4) (pow a1 2))) (* -1 (pow a2 2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(* (pow a2 2) (+ (* -1 (pow a1 2)) (* -1 (pow a2 2))))
(* (pow a2 2) (+ (* -1 (pow a1 2)) (* -1 (pow a2 2))))
(* (pow a2 2) (+ (* -1 (pow a1 2)) (* -1 (pow a2 2))))
(* -1 (pow a2 4))
(* (pow a2 4) (- (* -1 (/ (pow a1 2) (pow a2 2))) 1))
(* (pow a2 4) (- (* -1 (/ (pow a1 2) (pow a2 2))) 1))
(* (pow a2 4) (- (* -1 (/ (pow a1 2) (pow a2 2))) 1))
(* -1 (pow a2 4))
(* (pow a2 4) (- (* -1 (/ (pow a1 2) (pow a2 2))) 1))
(* (pow a2 4) (- (* -1 (/ (pow a1 2) (pow a2 2))) 1))
(* (pow a2 4) (- (* -1 (/ (pow a1 2) (pow a2 2))) 1))
(/ -1 (pow a2 2))
(- (* -1 (/ (pow a1 2) (pow a2 4))) (/ 1 (pow a2 2)))
(- (* (pow a1 2) (- (* -1 (/ (pow a1 2) (pow a2 6))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))
(- (* (pow a1 2) (- (* (pow a1 2) (- (* -1 (/ (pow a1 2) (pow a2 8))) (/ 1 (pow a2 6)))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))
(/ 1 (pow a1 2))
(/ (+ 1 (/ (pow a2 2) (pow a1 2))) (pow a1 2))
(/ (+ 1 (+ (/ (pow a2 2) (pow a1 2)) (/ (pow a2 4) (pow a1 4)))) (pow a1 2))
(/ (+ 1 (+ (/ (pow a2 2) (pow a1 2)) (+ (/ (pow a2 4) (pow a1 4)) (/ (pow a2 6) (pow a1 6))))) (pow a1 2))
(/ 1 (pow a1 2))
(/ (+ 1 (/ (pow a2 2) (pow a1 2))) (pow a1 2))
(/ (+ 1 (+ (/ (pow a2 2) (pow a1 2)) (/ (pow a2 4) (pow a1 4)))) (pow a1 2))
(/ (+ 1 (+ (/ (pow a2 2) (pow a1 2)) (+ (/ (pow a2 4) (pow a1 4)) (/ (pow a2 6) (pow a1 6))))) (pow a1 2))
(/ 1 (pow a1 2))
(+ (/ 1 (pow a1 2)) (/ (pow a2 2) (pow a1 4)))
(+ (* (pow a2 2) (+ (/ 1 (pow a1 4)) (/ (pow a2 2) (pow a1 6)))) (/ 1 (pow a1 2)))
(+ (* (pow a2 2) (+ (* (pow a2 2) (+ (/ 1 (pow a1 6)) (/ (pow a2 2) (pow a1 8)))) (/ 1 (pow a1 4)))) (/ 1 (pow a1 2)))
(/ -1 (pow a2 2))
(/ (- (* -1 (/ (pow a1 2) (pow a2 2))) 1) (pow a2 2))
(/ (- (+ (* -1 (/ (pow a1 2) (pow a2 2))) (* -1 (/ (pow a1 4) (pow a2 4)))) 1) (pow a2 2))
(/ (- (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (pow a1 4) (pow a2 4))) (* -1 (/ (pow a1 6) (pow a2 6))))) 1) (pow a2 2))
(/ -1 (pow a2 2))
(/ (- (* -1 (/ (pow a1 2) (pow a2 2))) 1) (pow a2 2))
(/ (- (+ (* -1 (/ (pow a1 2) (pow a2 2))) (* -1 (/ (pow a1 4) (pow a2 4)))) 1) (pow a2 2))
(/ (- (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (pow a1 4) (pow a2 4))) (* -1 (/ (pow a1 6) (pow a2 6))))) 1) (pow a2 2))
(* -1 (pow a2 6))
(- (pow a1 6) (pow a2 6))
(- (pow a1 6) (pow a2 6))
(- (pow a1 6) (pow a2 6))
(pow a1 6)
(* (pow a1 6) (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))))
(* (pow a1 6) (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))))
(* (pow a1 6) (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))))
(pow a1 6)
(* (pow a1 6) (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))))
(* (pow a1 6) (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))))
(* (pow a1 6) (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))))
(pow a1 6)
(+ (* -1 (pow a2 6)) (pow a1 6))
(+ (* -1 (pow a2 6)) (pow a1 6))
(+ (* -1 (pow a2 6)) (pow a1 6))
(* -1 (pow a2 6))
(* (pow a2 6) (- (/ (pow a1 6) (pow a2 6)) 1))
(* (pow a2 6) (- (/ (pow a1 6) (pow a2 6)) 1))
(* (pow a2 6) (- (/ (pow a1 6) (pow a2 6)) 1))
(* -1 (pow a2 6))
(* (pow a2 6) (- (/ (pow a1 6) (pow a2 6)) 1))
(* (pow a2 6) (- (/ (pow a1 6) (pow a2 6)) 1))
(* (pow a2 6) (- (/ (pow a1 6) (pow a2 6)) 1))
Outputs
(/ (* (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) (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 (*.f64 (*.f64 (*.f64 a2 a2) #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 (*.f64 a2 a2) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/24 binary64)) (*.f64 th th)) (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 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 a2 a2)) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/24 binary64)) (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))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 a2 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 (*.f64 (*.f64 a2 a2) #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 th th) (+.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1/24 binary64)) (*.f64 th th)))))
(+ (* (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 th th) (+.f64 (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 a2 a2)) (*.f64 th th)) (*.f64 (*.f64 a2 a2) #s(literal 1/24 binary64)))))))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 (*.f64 a2 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)
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 th th) (+.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #s(literal -1/2 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 (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))) #s(literal -1/2 binary64))))
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow 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) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 a2 a2) #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) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 a2 a2) #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) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 a2 a2) #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 (*.f64 a2 a2) #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 th th) (+.f64 (/.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 a2 a2) (*.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 th th) (+.f64 (/.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 a2 a2) (*.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 th th) (+.f64 (/.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 a2 a2) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a2 a2) #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 th th) (+.f64 (/.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 a2 a2) (*.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 th th) (+.f64 (/.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 a2 a2) (*.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 th th) (+.f64 (/.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 a2 a2) (*.f64 th th)) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow a2 2) (+ 1 (* -1/2 (pow th 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(pow a2 2)
(*.f64 a2 a2)
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(+.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (*.f64 th th)))
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(+.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (*.f64 th th)))
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(+.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (*.f64 th th)))
(* -1/2 (* (pow a2 2) (pow th 2)))
(*.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (*.f64 th th))
(* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))
(*.f64 (*.f64 th th) (+.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (*.f64 th th))))
(* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))
(*.f64 (*.f64 th th) (+.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (*.f64 th th))))
(* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))
(*.f64 (*.f64 th th) (+.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (*.f64 th th))))
(* -1/2 (* (pow a2 2) (pow th 2)))
(*.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (*.f64 th th))
(* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))
(*.f64 (*.f64 th th) (+.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (*.f64 th th))))
(* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))
(*.f64 (*.f64 th th) (+.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (*.f64 th th))))
(* (pow th 2) (+ (* -1/2 (pow a2 2)) (/ (pow a2 2) (pow th 2))))
(*.f64 (*.f64 th th) (+.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (*.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 (* -1/2 (pow th 2)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(+ 1 (* -1/2 (pow th 2)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(*.f64 (*.f64 th th) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 th th)) #s(literal -1/2 binary64)))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(*.f64 (*.f64 th th) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 th th)) #s(literal -1/2 binary64)))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(*.f64 (*.f64 th th) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 th th)) #s(literal -1/2 binary64)))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(*.f64 (*.f64 th th) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 th th)) #s(literal -1/2 binary64)))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(*.f64 (*.f64 th th) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 th th)) #s(literal -1/2 binary64)))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(*.f64 (*.f64 th th) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 th th)) #s(literal -1/2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (* a1 (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64))
(+ (* a1 (+ (* -1 (/ a2 (sqrt 2))) (+ (* a1 (+ (* 2 (/ 1 (sqrt 2))) (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (pow a2 2)))) (/ a2 (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (-.f64 (+.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (+.f64 (/.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(+ (* a1 (+ (* -1 (/ a2 (sqrt 2))) (+ (* a1 (+ (* 2 (/ 1 (sqrt 2))) (+ (/ (* a1 (* (+ a2 (* -1 a2)) (+ (* 2 (/ 1 (sqrt 2))) (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (pow a2 2))))) (pow a2 2)) (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (pow a2 2))))) (/ a2 (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (-.f64 (+.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (+.f64 (+.f64 (/.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (/.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 #s(literal 0 binary64) (/.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a2 a2))) (/.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(* -1 (/ (pow a2 2) (sqrt 2)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (pow a2 2) (sqrt 2))) (/ (* (pow a2 2) (+ a2 (* -1 a2))) (* a1 (sqrt 2))))
(-.f64 (/.f64 (/.f64 #s(literal 0 binary64) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1 (/ (- (/ (pow a2 4) (sqrt 2)) (+ (* -1 (/ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (sqrt 2))) (* -1 (/ (pow a2 4) (sqrt 2))))) (pow a1 2))) (+ (* -1 (/ (pow a2 2) (sqrt 2))) (/ (* (pow a2 2) (+ a2 (* -1 a2))) (* a1 (sqrt 2)))))
(-.f64 (-.f64 (/.f64 (/.f64 #s(literal 0 binary64) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (/.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 a1)))
(+ (* -1 (/ (- (/ (pow a2 4) (sqrt 2)) (+ (* -1 (/ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (sqrt 2))) (* -1 (/ (pow a2 4) (sqrt 2))))) (pow a1 2))) (+ (* -1 (/ (pow a2 2) (sqrt 2))) (+ (/ (* (+ a2 (* -1 a2)) (- (/ (pow a2 4) (sqrt 2)) (+ (* -1 (/ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (sqrt 2))) (* -1 (/ (pow a2 4) (sqrt 2)))))) (pow a1 3)) (+ (/ (* (pow a2 2) (+ a2 (* -1 a2))) (* a1 (sqrt 2))) (/ (* (pow a2 4) (+ a2 (* -1 a2))) (* (pow a1 3) (sqrt 2)))))))
(-.f64 (-.f64 (+.f64 (*.f64 (/.f64 (-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (/.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 a1)) (/.f64 #s(literal 0 binary64) a1)) (+.f64 (/.f64 (/.f64 #s(literal 0 binary64) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (-.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (/.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 a1)))
(* -1 (/ (pow a2 2) (sqrt 2)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (/ (pow a2 2) (sqrt 2))) (/ (* (pow a2 2) (+ a2 (* -1 a2))) (* a1 (sqrt 2))))
(-.f64 (/.f64 (/.f64 #s(literal 0 binary64) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow a2 4) (sqrt 2))) (+ (/ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (sqrt 2)) (/ (pow a2 4) (sqrt 2)))) a1)) (/ (* (pow a2 2) (+ a2 (* -1 a2))) (sqrt 2))) a1)) (* -1 (/ (pow a2 2) (sqrt 2))))
(-.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (/.f64 (-.f64 (-.f64 (/.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) a1)) (/.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) a1))
(+ (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a2 (* -1 a2)) (- (* -1 (/ (pow a2 4) (sqrt 2))) (+ (/ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (sqrt 2)) (/ (pow a2 4) (sqrt 2))))) a1)) (+ (* -1 (/ (pow a2 4) (sqrt 2))) (/ (* (pow a2 4) (+ a2 (* -1 a2))) (* a1 (sqrt 2))))) (+ (/ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (sqrt 2)) (/ (pow a2 4) (sqrt 2)))) a1)) (/ (* (pow a2 2) (+ a2 (* -1 a2))) (sqrt 2))) a1)) (* -1 (/ (pow a2 2) (sqrt 2))))
(-.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (-.f64 (-.f64 (/.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 0 binary64)) a1) (+.f64 (-.f64 (/.f64 (/.f64 #s(literal 0 binary64) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (/.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) a1)) (/.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) a1))
(* -1 (/ (pow a2 2) (sqrt 2)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (- (* -2 (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (/ 1 (sqrt 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (- (* (pow a2 2) (- (* 2 (/ (* a2 (+ a1 (* -1 a1))) (* (pow a1 4) (sqrt 2)))) (* 2 (/ 1 (* (pow a1 2) (sqrt 2)))))) (/ 1 (sqrt 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (*.f64 (*.f64 a2 a2) (+.f64 (/.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a2 2) (- (* (pow a2 2) (- (* a2 (+ (* -1 (* a2 (- (* 2 (/ 1 (* (pow a1 4) (sqrt 2)))) (* -2 (/ (pow (+ a1 (* -1 a1)) 2) (* (pow a1 6) (sqrt 2))))))) (* 2 (/ (+ a1 (* -1 a1)) (* (pow a1 4) (sqrt 2)))))) (* 2 (/ 1 (* (pow a1 2) (sqrt 2)))))) (/ 1 (sqrt 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a2 (-.f64 (/.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a1 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (+.f64 (/.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (/.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a1 #s(literal 6 binary64))) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 #s(literal -2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (* -1 (/ a1 (* a2 (sqrt 2)))) (+ (/ 1 (sqrt 2)) (/ a1 (* a2 (sqrt 2))))))
(*.f64 (*.f64 a2 a2) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a1 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a2 2) (+ (* -1 (/ a1 (* a2 (sqrt 2)))) (+ (* -1 (/ (- (* -1 (/ (pow a1 2) (sqrt 2))) (+ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2)))) (pow a2 2))) (+ (/ 1 (sqrt 2)) (/ a1 (* a2 (sqrt 2)))))))
(*.f64 (*.f64 a2 a2) (-.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64))) (*.f64 a2 a2))) (/.f64 a1 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a2 2) (+ (* -1 (/ a1 (* a2 (sqrt 2)))) (+ (* -1 (/ (* (+ a1 (* -1 a1)) (- (* -1 (/ (pow a1 2) (sqrt 2))) (+ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2))))) (pow a2 3))) (+ (* -1 (/ (- (* -1 (/ (pow a1 2) (sqrt 2))) (+ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2)))) (pow a2 2))) (+ (/ 1 (sqrt 2)) (+ (/ a1 (* a2 (sqrt 2))) (/ (* (pow a1 2) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (pow a2 3))))))))
(*.f64 (*.f64 a2 a2) (-.f64 (+.f64 (/.f64 (*.f64 (-.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64))) #s(literal 0 binary64)) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 a1 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (-.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64))) (*.f64 a2 a2)))) (/.f64 a1 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (* -1 (/ (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))) a2)) (/ 1 (sqrt 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 0 binary64) a2)))
(* (pow a2 2) (+ (* -1 (/ (- (+ (* -1 (/ a1 (sqrt 2))) (+ (* -1 (/ (pow a1 2) (* a2 (sqrt 2)))) (/ a1 (sqrt 2)))) (+ (/ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) a2) (/ (pow a1 2) (* a2 (sqrt 2))))) a2)) (/ 1 (sqrt 2))))
(*.f64 (*.f64 a2 a2) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (-.f64 (-.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 a1 a1) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 0 binary64) a2))) a2)))
(* (pow a2 2) (+ (* -1 (/ (+ (* -1 (/ a1 (sqrt 2))) (+ (* -1 (/ (+ (* -1 (- (* -1 (/ (pow a1 2) (sqrt 2))) (+ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2))))) (* -1 (/ (+ (* -1 (* (+ a1 (* -1 a1)) (- (* -1 (/ (pow a1 2) (sqrt 2))) (+ (* (+ a1 (* -1 a1)) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2)))))) (* (pow a1 2) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) a2))) a2)) (/ a1 (sqrt 2)))) a2)) (/ 1 (sqrt 2))))
(*.f64 (*.f64 a2 a2) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (-.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (/.f64 (*.f64 (-.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64))) #s(literal 0 binary64)) a2) (-.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64)))) a2)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a2)))
(pow a2 2)
(*.f64 a2 a2)
(+ (* a1 (+ a2 (* -1 a2))) (pow a2 2))
(*.f64 a2 a2)
(+ (* a1 (+ a2 (+ (* -1 a2) (* a1 (+ 2 (/ (pow (+ a2 (* -1 a2)) 2) (pow a2 2))))))) (pow a2 2))
(+.f64 (*.f64 a2 a2) (+.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 2 binary64) (/.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))))
(+ (* a1 (+ a2 (+ (* -1 a2) (* a1 (+ 2 (+ (/ (* a1 (* (+ 2 (/ (pow (+ a2 (* -1 a2)) 2) (pow a2 2))) (+ a2 (* -1 a2)))) (pow a2 2)) (/ (pow (+ a2 (* -1 a2)) 2) (pow a2 2)))))))) (pow a2 2))
(+.f64 (*.f64 a2 a2) (+.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 a1 (+.f64 (/.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal 0 binary64))) (*.f64 a2 a2)) (/.f64 #s(literal 0 binary64) (*.f64 a2 a2))))))))
(* -1 (pow a2 2))
(-.f64 #s(literal 0 binary64) (*.f64 a2 a2))
(+ (* -1 (pow a2 2)) (/ (* (pow a2 2) (+ a2 (* -1 a2))) a1))
(-.f64 (/.f64 #s(literal 0 binary64) a1) (*.f64 a2 a2))
(+ (* -1 (/ (- (pow a2 4) (+ (* -1 (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2))) (* -1 (pow a2 4)))) (pow a1 2))) (+ (* -1 (pow a2 2)) (/ (* (pow a2 2) (+ a2 (* -1 a2))) a1)))
(-.f64 (-.f64 (/.f64 #s(literal 0 binary64) a1) (*.f64 a2 a2)) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 a1 a1)))
(+ (* -1 (/ (- (pow a2 4) (+ (* -1 (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2))) (* -1 (pow a2 4)))) (pow a1 2))) (+ (* -1 (pow a2 2)) (+ (/ (* (+ a2 (* -1 a2)) (- (pow a2 4) (+ (* -1 (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2))) (* -1 (pow a2 4))))) (pow a1 3)) (+ (/ (* (pow a2 2) (+ a2 (* -1 a2))) a1) (/ (* (pow a2 4) (+ a2 (* -1 a2))) (pow a1 3))))))
(-.f64 (-.f64 (+.f64 (/.f64 (+.f64 #s(literal 0 binary64) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64)))))) (*.f64 a1 (*.f64 a1 a1))) (+.f64 (/.f64 #s(literal 0 binary64) a1) (/.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 a2)) (/.f64 (-.f64 (pow.f64 a2 #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 a1 a1)))
(* -1 (pow a2 2))
(-.f64 #s(literal 0 binary64) (*.f64 a2 a2))
(+ (* -1 (pow a2 2)) (/ (* (pow a2 2) (+ a2 (* -1 a2))) a1))
(-.f64 (/.f64 #s(literal 0 binary64) a1) (*.f64 a2 a2))
(+ (* -1 (/ (- (* -1 (/ (- (* -1 (pow a2 4)) (+ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (pow a2 4))) a1)) (* (pow a2 2) (+ a2 (* -1 a2)))) a1)) (* -1 (pow a2 2)))
(-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) a1)) #s(literal 0 binary64)) a1))
(+ (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a2 (* -1 a2)) (- (* -1 (pow a2 4)) (+ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (pow a2 4)))) a1)) (+ (* -1 (pow a2 4)) (/ (* (pow a2 4) (+ a2 (* -1 a2))) a1))) (+ (* (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) (pow a2 4))) a1)) (* (pow a2 2) (+ a2 (* -1 a2)))) a1)) (* -1 (pow a2 2)))
(-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (+.f64 (/.f64 (+.f64 (/.f64 (*.f64 (-.f64 (-.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 a2 #s(literal 4 binary64))) #s(literal 0 binary64)) a1) (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 (/.f64 #s(literal 0 binary64) a1) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64)))))) a1) #s(literal 0 binary64)) a1))
(* -1 (pow a2 2))
(-.f64 #s(literal 0 binary64) (*.f64 a2 a2))
(* (pow a2 2) (- (* -2 (/ (pow a2 2) (pow a1 2))) 1))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) #s(literal -1 binary64)))
(* (pow a2 2) (- (* (pow a2 2) (- (* 2 (/ (* a2 (+ a1 (* -1 a1))) (pow a1 4))) (* 2 (/ 1 (pow a1 2))))) 1))
(*.f64 (*.f64 a2 a2) (+.f64 (*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 #s(literal -2 binary64) (*.f64 a1 a1)))) #s(literal -1 binary64)))
(* (pow a2 2) (- (* (pow a2 2) (- (* a2 (+ (* -1 (* a2 (- (* 2 (/ 1 (pow a1 4))) (* -2 (/ (pow (+ a1 (* -1 a1)) 2) (pow a1 6)))))) (* 2 (/ (+ a1 (* -1 a1)) (pow a1 4))))) (* 2 (/ 1 (pow a1 2))))) 1))
(*.f64 (*.f64 a2 a2) (+.f64 (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 a2 (-.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 a2 (+.f64 (/.f64 #s(literal 2 binary64) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 #s(literal 0 binary64) (pow.f64 a1 #s(literal 6 binary64))))))) (/.f64 #s(literal -2 binary64) (*.f64 a1 a1)))) #s(literal -1 binary64)))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2))))
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (- (* -1 (pow a1 2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) (pow a2 2))) (/ a1 a2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 a1 a2)) (-.f64 (/.f64 a1 a2) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (+.f64 (*.f64 a1 a1) #s(literal 0 binary64))) (*.f64 a2 a2)))))
(* (pow a2 2) (+ 1 (+ (* -1 (/ a1 a2)) (+ (* -1 (/ (* (+ a1 (* -1 a1)) (- (* -1 (pow a1 2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2)))) (pow a2 3))) (+ (* -1 (/ (- (* -1 (pow a1 2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) (pow a2 2))) (+ (/ a1 a2) (/ (* (pow a1 2) (+ a1 (* -1 a1))) (pow a2 3))))))))
(*.f64 (*.f64 a2 a2) (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 a1 a2)) (+.f64 (/.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 a2))) (-.f64 (+.f64 (/.f64 a1 a2) (/.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (+.f64 (*.f64 a1 a1) #s(literal 0 binary64))) (*.f64 a2 a2))))))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (* -1 (/ (+ a1 (* -1 a1)) a2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 0 binary64) a2)))
(* (pow a2 2) (+ 1 (* -1 (/ (- (+ a1 (+ (* -1 a1) (* -1 (/ (pow a1 2) a2)))) (+ (/ (pow a1 2) a2) (/ (pow (+ a1 (* -1 a1)) 2) a2))) a2))))
(*.f64 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) a2) (/.f64 (+.f64 (*.f64 a1 a1) #s(literal 0 binary64)) a2)) a2)))
(* (pow a2 2) (+ 1 (* -1 (/ (+ a1 (+ (* -1 a1) (* -1 (/ (+ (* -1 (- (* -1 (pow a1 2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2)))) (* -1 (/ (+ (* -1 (* (+ a1 (* -1 a1)) (- (* -1 (pow a1 2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))))) (* (pow a1 2) (+ a1 (* -1 a1)))) a2))) a2)))) a2))))
(*.f64 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (/.f64 #s(literal 0 binary64) a2) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (+.f64 (*.f64 a1 a1) #s(literal 0 binary64)))) (-.f64 #s(literal 0 binary64) a2)) a2)))
(/ -1 (pow a2 2))
(/.f64 #s(literal -1 binary64) (*.f64 a2 a2))
(- (* -1 (/ (pow a1 2) (pow a2 4))) (/ 1 (pow a2 2)))
(+.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64)))) (/.f64 #s(literal -1 binary64) (*.f64 a2 a2)))
(- (* (pow a1 2) (- (* -1 (/ (pow a1 2) (pow a2 6))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))
(+.f64 (*.f64 (*.f64 a1 a1) (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 #s(literal -1 binary64) (pow.f64 a2 #s(literal 4 binary64))))) (/.f64 #s(literal -1 binary64) (*.f64 a2 a2)))
(- (* (pow a1 2) (- (* (pow a1 2) (- (* -1 (/ (pow a1 2) (pow a2 8))) (/ 1 (pow a2 6)))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))
(+.f64 (*.f64 (*.f64 a1 a1) (+.f64 (*.f64 (*.f64 a1 a1) (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (pow.f64 a2 #s(literal 8 binary64))) (/.f64 #s(literal -1 binary64) (pow.f64 a2 #s(literal 6 binary64))))) (/.f64 #s(literal -1 binary64) (pow.f64 a2 #s(literal 4 binary64))))) (/.f64 #s(literal -1 binary64) (*.f64 a2 a2)))
(/ 1 (pow a1 2))
(/.f64 #s(literal 1 binary64) (*.f64 a1 a1))
(/ (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))) (pow a1 2))
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 0 binary64) a1)) (*.f64 a1 a1))
(/ (- (+ 1 (* -1 (/ (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2))) (pow a1 2)))) (+ (* -1 (/ a2 a1)) (/ a2 a1))) (pow a1 2))
(/.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal 0 binary64))) (*.f64 a1 a1))
(/ (- (+ 1 (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2))))) (* (pow a2 2) (+ a2 (* -1 a2)))) (pow a1 3)))) (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a1 2))) (/ a2 a1))))) (pow a1 2))
(/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 a1)))) (-.f64 (-.f64 (+.f64 (/.f64 a2 a1) (/.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 a2 a1))) (*.f64 a1 a1))
(/ 1 (pow a1 2))
(/.f64 #s(literal 1 binary64) (*.f64 a1 a1))
(/ (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))) (pow a1 2))
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 0 binary64) a1)) (*.f64 a1 a1))
(/ (+ 1 (* -1 (/ (- (+ (* -1 (/ (pow a2 2) a1)) (* -1 (/ (pow (+ a2 (* -1 a2)) 2) a1))) (* -1 (+ a2 (* -1 a2)))) a1))) (pow a1 2))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 (/.f64 #s(literal 0 binary64) a1) (/.f64 (*.f64 a2 a2) a1)) #s(literal 0 binary64)) a1)) (*.f64 a1 a1))
(/ (+ 1 (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (pow a2 2) (+ a2 (* -1 a2))) a1)) (/ (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2)))) a1)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2)))) a1)) (* -1 (+ a2 (* -1 a2)))) a1))) (pow a1 2))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (+.f64 (/.f64 #s(literal 0 binary64) a1) (+.f64 (/.f64 #s(literal 0 binary64) a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) a1)) #s(literal 0 binary64)) a1)) (*.f64 a1 a1))
(/ 1 (pow a1 2))
(/.f64 #s(literal 1 binary64) (*.f64 a1 a1))
(+ (/ 1 (pow a1 2)) (/ (pow a2 2) (pow a1 4)))
(+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (/.f64 (*.f64 a2 a2) (pow.f64 a1 #s(literal 4 binary64))))
(+ (* (pow a2 2) (+ (/ 1 (pow a1 4)) (/ (pow a2 2) (pow a1 6)))) (/ 1 (pow a1 2)))
(+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 a1 #s(literal 6 binary64))))))
(+ (* (pow a2 2) (+ (* (pow a2 2) (+ (/ 1 (pow a1 6)) (/ (pow a2 2) (pow a1 8)))) (/ 1 (pow a1 4)))) (/ 1 (pow a1 2)))
(+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a1 #s(literal 6 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 a1 #s(literal 8 binary64))))))))
(/ -1 (pow a2 2))
(/.f64 #s(literal -1 binary64) (*.f64 a2 a2))
(/ (- (* -1 (/ (+ a1 (* -1 a1)) a2)) 1) (pow a2 2))
(/.f64 (+.f64 (/.f64 #s(literal 0 binary64) a2) #s(literal -1 binary64)) (*.f64 a2 a2))
(/ (- (* -1 (/ (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2)) (pow a2 2))) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2)))) (pow a2 2))
(/.f64 (+.f64 (/.f64 (+.f64 (*.f64 a1 a1) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) #s(literal -1 binary64)) (*.f64 a2 a2))
(/ (- (* -1 (/ (+ (* (+ a1 (* -1 a1)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) (* (pow a1 2) (+ a1 (* -1 a1)))) (pow a2 3))) (+ 1 (+ (* -1 (/ a1 a2)) (+ (/ a1 a2) (+ (/ (pow a1 2) (pow a2 2)) (/ (pow (+ a1 (* -1 a1)) 2) (pow a2 2))))))) (pow a2 2))
(/.f64 (-.f64 (/.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))) (*.f64 a2 a2))
(/ -1 (pow a2 2))
(/.f64 #s(literal -1 binary64) (*.f64 a2 a2))
(/ (- (+ (* -1 (/ a1 a2)) (/ a1 a2)) 1) (pow a2 2))
(/.f64 #s(literal -1 binary64) (*.f64 a2 a2))
(/ (- (* -1 (/ (- (+ (/ (pow a1 2) a2) (/ (pow (+ a1 (* -1 a1)) 2) a2)) (+ a1 (* -1 a1))) a2)) 1) (pow a2 2))
(/.f64 (+.f64 (/.f64 (+.f64 (/.f64 (+.f64 (*.f64 a1 a1) #s(literal 0 binary64)) a2) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) a2)) #s(literal -1 binary64)) (*.f64 a2 a2))
(/ (- (* -1 (/ (- (* -1 (/ (- (+ (/ (* (+ a1 (* -1 a1)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) a2) (/ (* (pow a1 2) (+ a1 (* -1 a1))) a2)) (+ (pow a1 2) (pow (+ a1 (* -1 a1)) 2))) a2)) (+ a1 (* -1 a1))) a2)) 1) (pow a2 2))
(/.f64 (+.f64 (/.f64 (+.f64 (/.f64 (+.f64 (-.f64 (+.f64 (/.f64 #s(literal 0 binary64) a2) (/.f64 #s(literal 0 binary64) a2)) (*.f64 a1 a1)) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) a2)) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) a2)) #s(literal -1 binary64)) (*.f64 a2 a2))
(/ 1 a2)
(/.f64 #s(literal 1 binary64) a2)
(+ (* -1 (/ a1 (pow a2 2))) (/ 1 a2))
(-.f64 (/.f64 #s(literal 1 binary64) a2) (/.f64 a1 (*.f64 a2 a2)))
(+ (* a1 (- (/ a1 (pow a2 3)) (/ 1 (pow a2 2)))) (/ 1 a2))
(+.f64 (/.f64 #s(literal 1 binary64) a2) (*.f64 a1 (+.f64 (/.f64 a1 (*.f64 a2 (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (*.f64 a2 a2)))))
(+ (* a1 (- (* a1 (+ (* -1 (/ a1 (pow a2 4))) (/ 1 (pow a2 3)))) (/ 1 (pow a2 2)))) (/ 1 a2))
(+.f64 (/.f64 #s(literal 1 binary64) a2) (*.f64 a1 (+.f64 (*.f64 a1 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 (*.f64 a2 a2))) (/.f64 a1 (pow.f64 a2 #s(literal 4 binary64))))) (/.f64 #s(literal -1 binary64) (*.f64 a2 a2)))))
(/ 1 a1)
(/.f64 #s(literal 1 binary64) a1)
(/ (+ 1 (* -1 (/ a2 a1))) a1)
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 a2 a1)) a1)
(/ (- (+ 1 (/ (pow a2 2) (pow a1 2))) (/ a2 a1)) a1)
(/.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 a2 a1))) a1)
(/ (- (+ 1 (* -1 (/ (pow a2 3) (pow a1 3)))) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (/ a2 a1))) a1)
(/.f64 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 a1)))) (-.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 a2 a1))) a1)
(/ 1 a1)
(/.f64 #s(literal 1 binary64) a1)
(* -1 (/ (- (/ a2 a1) 1) a1))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 a2 a1)) a1)
(* -1 (/ (- (* -1 (/ (- (/ (pow a2 2) a1) a2) a1)) 1) a1))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (/.f64 (-.f64 (/.f64 (*.f64 a2 a2) a1) a2) (-.f64 #s(literal 0 binary64) a1)) #s(literal -1 binary64)) a1))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow a2 3) a1) (pow a2 2)) a1)) a2) a1)) 1) a1))
(/.f64 (+.f64 (/.f64 (-.f64 (/.f64 (-.f64 (/.f64 (*.f64 a2 (*.f64 a2 a2)) a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) a1)) a2) (-.f64 #s(literal 0 binary64) a1)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) a1))
(/ 1 a1)
(/.f64 #s(literal 1 binary64) a1)
(+ (* -1 (/ a2 (pow a1 2))) (/ 1 a1))
(-.f64 (/.f64 #s(literal 1 binary64) a1) (/.f64 a2 (*.f64 a1 a1)))
(+ (* a2 (- (/ a2 (pow a1 3)) (/ 1 (pow a1 2)))) (/ 1 a1))
(+.f64 (/.f64 #s(literal 1 binary64) a1) (*.f64 a2 (+.f64 (/.f64 a2 (*.f64 a1 (*.f64 a1 a1))) (/.f64 #s(literal -1 binary64) (*.f64 a1 a1)))))
(+ (* a2 (- (* a2 (+ (* -1 (/ a2 (pow a1 4))) (/ 1 (pow a1 3)))) (/ 1 (pow a1 2)))) (/ 1 a1))
(+.f64 (/.f64 #s(literal 1 binary64) a1) (*.f64 a2 (+.f64 (*.f64 a2 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 (*.f64 a1 a1))) (/.f64 a2 (pow.f64 a1 #s(literal 4 binary64))))) (/.f64 #s(literal -1 binary64) (*.f64 a1 a1)))))
(/ 1 a2)
(/.f64 #s(literal 1 binary64) a2)
(/ (+ 1 (* -1 (/ a1 a2))) a2)
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 a1 a2)) a2)
(/ (- (+ 1 (/ (pow a1 2) (pow a2 2))) (/ a1 a2)) a2)
(/.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 a1 a2))) a2)
(/ (- (+ 1 (* -1 (/ (pow a1 3) (pow a2 3)))) (+ (* -1 (/ (pow a1 2) (pow a2 2))) (/ a1 a2))) a2)
(/.f64 (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (/.f64 a1 a2) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) a2)
(/ 1 a2)
(/.f64 #s(literal 1 binary64) a2)
(* -1 (/ (- (/ a1 a2) 1) a2))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 a1 a2)) a2)
(* -1 (/ (- (* -1 (/ (- (/ (pow a1 2) a2) a1) a2)) 1) a2))
(/.f64 (+.f64 (/.f64 (-.f64 (/.f64 (*.f64 a1 a1) a2) a1) (-.f64 #s(literal 0 binary64) a2)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) a2))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (/ (pow a1 3) a2) (pow a1 2)) a2)) a1) a2)) 1) a2))
(/.f64 (+.f64 (/.f64 (-.f64 (/.f64 (-.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) a2) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) a2)) a1) (-.f64 #s(literal 0 binary64) a2)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) a2))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* a1 (+ (* -1 (pow a2 5)) (pow a2 5))) (* (pow a2 4) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* a1 (- (* a1 (- (/ 1 (sqrt 2)) (+ (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (* (pow a2 4) (sqrt 2)))) (* -1 (/ (pow (+ (* -1 (pow a2 5)) (pow a2 5)) 2) (* (pow a2 10) (sqrt 2))))))) (* -1 (/ (+ (* -1 (pow a2 5)) (pow a2 5)) (* (pow a2 4) (sqrt 2)))))) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (+.f64 (*.f64 a1 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 10 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* a1 (- (* a1 (- (+ (* -1 (* a1 (+ (* -1 (/ (* (+ (* -1 (pow a2 4)) (pow a2 4)) (+ (* -1 (pow a2 5)) (pow a2 5))) (* (pow a2 10) (sqrt 2)))) (+ (* -1 (/ (* (+ (* -1 (pow a2 5)) (pow a2 5)) (- (/ 1 (sqrt 2)) (+ (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (* (pow a2 4) (sqrt 2)))) (* -1 (/ (pow (+ (* -1 (pow a2 5)) (pow a2 5)) 2) (* (pow a2 10) (sqrt 2))))))) (pow a2 6))) (* -1 (/ (+ (* -1 (pow a2 3)) (pow a2 3)) (* (pow a2 4) (sqrt 2)))))))) (/ 1 (sqrt 2))) (+ (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (* (pow a2 4) (sqrt 2)))) (* -1 (/ (pow (+ (* -1 (pow a2 5)) (pow a2 5)) 2) (* (pow a2 10) (sqrt 2))))))) (* -1 (/ (+ (* -1 (pow a2 5)) (pow a2 5)) (* (pow a2 4) (sqrt 2)))))) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (+.f64 (*.f64 a1 (+.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (+.f64 (/.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 10 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 10 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 0 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (/.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (/.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 10 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))) a1)) (/ 1 (sqrt 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 0 binary64) a1)))
(* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))))) (* -1 (/ (pow a2 2) (sqrt 2)))) (pow a1 2))) (/ 1 (sqrt 2))) (+ (* -1 (/ a2 (* a1 (sqrt 2)))) (/ a2 (* a1 (sqrt 2))))))
(*.f64 (*.f64 a1 a1) (+.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) #s(literal 0 binary64)))
(* (pow a1 2) (- (+ (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))))) (* -1 (/ (pow a2 2) (sqrt 2)))))) (+ (* -1 (* (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))) (+ (* -1 (pow a2 2)) (pow a2 2)))) (+ (* -1 (/ (pow a2 3) (sqrt 2))) (/ (pow a2 3) (sqrt 2))))) (pow a1 3))) (/ 1 (sqrt 2))) (+ (* -1 (/ a2 (* a1 (sqrt 2)))) (+ (* -1 (/ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (pow a1 2))) (+ (* -1 (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (/ a2 (* a1 (sqrt 2))))))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 (*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64)) (*.f64 a1 (*.f64 a1 a1))) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (+.f64 (-.f64 (/.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))) (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (/.f64 a2 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))) a1)) (/ 1 (sqrt 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 0 binary64) a1)))
(* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (+ (* -1 (/ (+ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (/ (pow a2 2) (sqrt 2))) a1)) (/ a2 (sqrt 2)))) a1)) (/ 1 (sqrt 2))))
(*.f64 (*.f64 a1 a1) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (+.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) a1)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1)))
(* (pow a1 2) (+ (* -1 (/ (+ (* -1 (/ a2 (sqrt 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (pow a2 3) (sqrt 2))) (+ (* (+ a2 (* -1 a2)) (+ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (/ (pow a2 2) (sqrt 2)))) (+ (* (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2))) (+ (* -1 (pow a2 2)) (pow a2 2))) (/ (pow a2 3) (sqrt 2))))) a1)) (+ (* (+ a2 (* -1 a2)) (+ (* -1 (/ a2 (sqrt 2))) (/ a2 (sqrt 2)))) (/ (pow a2 2) (sqrt 2)))) a1)) (/ a2 (sqrt 2)))) a1)) (/ 1 (sqrt 2))))
(*.f64 (*.f64 a1 a1) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (-.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64)) (/.f64 (-.f64 (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64)) #s(literal 0 binary64)) (+.f64 (/.f64 (*.f64 a2 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64))) (/.f64 (*.f64 a2 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) a1)) a1)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a1)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (* a2 (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 0 binary64))
(+ (* a2 (- (* a2 (- (/ 1 (sqrt 2)) (* -1 (/ (* (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))) (+ (* -1 (pow a1 5)) (pow a1 5))) (pow a1 6))))) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 0 binary64) (pow.f64 a1 #s(literal 6 binary64)))))) #s(literal 0 binary64)))
(+ (* a2 (- (* a2 (- (+ (* -1 (* a2 (+ (* -1 (/ (* (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))) (+ (* -1 (pow a1 4)) (pow a1 4))) (pow a1 6))) (/ (* (+ (* -1 (pow a1 5)) (pow a1 5)) (- (/ 1 (sqrt 2)) (* -1 (/ (* (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))) (+ (* -1 (pow a1 5)) (pow a1 5))) (pow a1 6))))) (pow a1 6))))) (/ 1 (sqrt 2))) (* -1 (/ (* (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))) (+ (* -1 (pow a1 5)) (pow a1 5))) (pow a1 6))))) (+ (* -1 (/ a1 (sqrt 2))) (/ a1 (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (+.f64 (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (+.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a1 #s(literal 6 binary64))) (/.f64 (+.f64 (*.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 0 binary64) (pow.f64 a1 #s(literal 6 binary64)))) (pow.f64 a1 #s(literal 6 binary64)))))) (/.f64 #s(literal 0 binary64) (pow.f64 a1 #s(literal 6 binary64)))))) #s(literal 0 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (* -1 (/ a1 (* a2 (sqrt 2)))) (+ (/ 1 (sqrt 2)) (/ a1 (* a2 (sqrt 2))))))
(*.f64 (*.f64 a2 a2) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a1 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (/.f64 a1 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a2 2) (- (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))) (+ (* -1 (/ (+ a1 (* -1 a1)) (* a2 (sqrt 2)))) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (* (pow a2 2) (sqrt 2)))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (* (pow a2 2) (sqrt 2))))))))
(*.f64 (*.f64 a2 a2) (+.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 0 binary64) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (/.f64 (/.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a2 2) (- (+ (* -1 (/ (+ (* -1 (* (+ a1 (* -1 a1)) (- (/ (pow a1 2) (sqrt 2)) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2))))))) (+ (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 2)) (pow a1 2))) (sqrt 2))) (* -1 (/ (+ (* -1 (pow a1 3)) (pow a1 3)) (sqrt 2))))) (pow a2 3))) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2))))) (+ (* -1 (/ (+ a1 (* -1 a1)) (* a2 (sqrt 2)))) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (* (pow a2 2) (sqrt 2)))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (* (pow a2 2) (sqrt 2))))))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 0 binary64)) (+.f64 (/.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 0 binary64) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (/.f64 (/.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 0 binary64) (*.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 (/ (+ a1 (* -1 a1)) (* a2 (sqrt 2)))) (/ 1 (sqrt 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 0 binary64) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(* (pow a2 2) (+ (* -1 (/ (- (* -1 (/ (- (/ (pow a1 2) (sqrt 2)) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2))))) a2)) (* -1 (/ (+ a1 (* -1 a1)) (sqrt 2)))) a2)) (/ 1 (sqrt 2))))
(*.f64 (*.f64 a2 a2) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (/.f64 (+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) a2)) (/.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) a2)))
(* (pow a2 2) (+ (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 2)) (pow a1 2))) (* a2 (sqrt 2)))) (+ (* -1 (/ (* (+ a1 (* -1 a1)) (- (/ (pow a1 2) (sqrt 2)) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2)))))) a2)) (+ (* -1 (/ (+ (* -1 (pow a1 3)) (pow a1 3)) (* a2 (sqrt 2)))) (/ (pow a1 2) (sqrt 2))))) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (sqrt 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (sqrt 2))))) a2)) (* -1 (/ (+ a1 (* -1 a1)) (sqrt 2)))) a2)) (/ 1 (sqrt 2))))
(*.f64 (*.f64 a2 a2) (-.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (+.f64 (/.f64 #s(literal 0 binary64) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 0 binary64)) a2) (+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 0 binary64) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))) (+.f64 (/.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) a2)) (/.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) a2)))
(pow a2 2)
(*.f64 a2 a2)
(+ (/ (* a1 (+ (* -1 (pow a2 5)) (pow a2 5))) (pow a2 4)) (pow a2 2))
(+.f64 (*.f64 a2 a2) (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64))))
(+ (* a1 (- (* a1 (- 1 (+ (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (pow a2 4))) (* -1 (/ (pow (+ (* -1 (pow a2 5)) (pow a2 5)) 2) (pow a2 10)))))) (* -1 (/ (+ (* -1 (pow a2 5)) (pow a2 5)) (pow a2 4))))) (pow a2 2))
(+.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 10 binary64))) (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64))))))) (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64)))))
(+ (* a1 (- (* a1 (- (+ 1 (* -1 (* a1 (+ (* -1 (/ (* (+ (* -1 (pow a2 4)) (pow a2 4)) (+ (* -1 (pow a2 5)) (pow a2 5))) (pow a2 10))) (+ (* -1 (/ (* (+ (* -1 (pow a2 5)) (pow a2 5)) (- 1 (+ (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (pow a2 4))) (* -1 (/ (pow (+ (* -1 (pow a2 5)) (pow a2 5)) 2) (pow a2 10)))))) (pow a2 6))) (* -1 (/ (+ (* -1 (pow a2 3)) (pow a2 3)) (pow a2 4)))))))) (+ (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (pow a2 4))) (* -1 (/ (pow (+ (* -1 (pow a2 5)) (pow a2 5)) 2) (pow a2 10)))))) (* -1 (/ (+ (* -1 (pow a2 5)) (pow a2 5)) (pow a2 4))))) (pow a2 2))
(+.f64 (*.f64 a2 a2) (+.f64 (*.f64 a1 (*.f64 a1 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 a1 (+.f64 (+.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 10 binary64))) (/.f64 (+.f64 #s(literal 0 binary64) (*.f64 #s(literal 0 binary64) (+.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 10 binary64))) (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64)))))) (pow.f64 a2 #s(literal 6 binary64)))) (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64)))))) (+.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 10 binary64))) (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64))))))) (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64)))))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))))
(*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 0 binary64) a1)))
(* (pow a1 2) (- (+ 1 (* -1 (/ (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2))) (pow a1 2)))) (+ (* -1 (/ a2 a1)) (/ a2 a1))))
(*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal 0 binary64))))
(* (pow a1 2) (- (+ 1 (* -1 (/ (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (* -1 (pow (+ a2 (* -1 a2)) 2))))) (+ (* -1 (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (pow a2 2)))) (+ (* -1 (pow a2 3)) (pow a2 3)))) (pow a1 3)))) (+ (* -1 (/ a2 a1)) (+ (* -1 (/ (pow a2 2) (pow a1 2))) (+ (* -1 (/ (pow (+ a2 (* -1 a2)) 2) (pow a1 2))) (/ a2 a1))))))
(*.f64 (*.f64 a1 a1) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 0 binary64) (*.f64 a1 (*.f64 a1 a1)))) (-.f64 (-.f64 (+.f64 (/.f64 a2 a1) (/.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 a2 a1))))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (* -1 (/ (+ a2 (* -1 a2)) a1))))
(*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 0 binary64) a1)))
(* (pow a1 2) (+ 1 (* -1 (/ (+ a2 (+ (* -1 a2) (* -1 (/ (+ (pow a2 2) (pow (+ a2 (* -1 a2)) 2)) a1)))) a1))))
(*.f64 (*.f64 a1 a1) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) a1) a1)))
(* (pow a1 2) (+ 1 (* -1 (/ (+ a2 (+ (* -1 a2) (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow a2 3)) (+ (* (+ a2 (* -1 a2)) (+ (* -1 (pow a2 2)) (pow a2 2))) (+ (* (+ a2 (* -1 a2)) (+ (pow a2 2) (pow (+ a2 (* -1 a2)) 2))) (pow a2 3)))) a1)) (+ (pow a2 2) (pow (+ a2 (* -1 a2)) 2))) a1)))) a1))))
(*.f64 (*.f64 a1 a1) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (*.f64 a2 a2) (/.f64 (-.f64 (+.f64 (*.f64 a2 (*.f64 a2 a2)) #s(literal 0 binary64)) (*.f64 a2 (*.f64 a2 a2))) a1)) (-.f64 #s(literal 0 binary64) a1)) a1)))
(pow a1 2)
(*.f64 a1 a1)
(+ (* -1 (* a2 (+ a1 (* -1 a1)))) (pow a1 2))
(+.f64 (*.f64 a1 a1) #s(literal 0 binary64))
(+ (* a2 (- (* a2 (- 1 (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 5)) (pow a1 5))) (pow a1 6))))) (+ a1 (* -1 a1)))) (pow a1 2))
(+.f64 (*.f64 a1 a1) (+.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 0 binary64) (pow.f64 a1 #s(literal 6 binary64)))))) #s(literal 0 binary64)))
(+ (* a2 (- (* a2 (- (+ 1 (* -1 (* a2 (+ (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 4)) (pow a1 4))) (pow a1 6))) (/ (* (+ (* -1 (pow a1 5)) (pow a1 5)) (- 1 (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 5)) (pow a1 5))) (pow a1 6))))) (pow a1 6)))))) (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 5)) (pow a1 5))) (pow a1 6))))) (+ a1 (* -1 a1)))) (pow a1 2))
(+.f64 (*.f64 a1 a1) (+.f64 (*.f64 a2 (*.f64 a2 (+.f64 (-.f64 #s(literal 1 binary64) (*.f64 a2 (+.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a1 #s(literal 6 binary64))) (/.f64 (+.f64 #s(literal 0 binary64) (/.f64 #s(literal 0 binary64) (pow.f64 a1 #s(literal 6 binary64)))) (pow.f64 a1 #s(literal 6 binary64)))))) (/.f64 #s(literal 0 binary64) (pow.f64 a1 #s(literal 6 binary64)))))) #s(literal 0 binary64)))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (+ (* -1 (/ a1 a2)) (/ a1 a2))))
(*.f64 a2 a2)
(* (pow a2 2) (- (+ 1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (+ a1 (* -1 a1)) a2)) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (pow a2 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (pow a2 2)))))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (+.f64 (/.f64 #s(literal 0 binary64) a2) (/.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal 0 binary64) (*.f64 a2 a2))))))
(* (pow a2 2) (- (+ 1 (+ (* -1 (/ (+ (* -1 (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 2)) (pow a1 2)))) (+ (* -1 (* (+ a1 (* -1 a1)) (- (pow a1 2) (+ (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (* -1 (pow (+ a1 (* -1 a1)) 2)))))) (* -1 (+ (* -1 (pow a1 3)) (pow a1 3))))) (pow a2 3))) (/ (pow a1 2) (pow a2 2)))) (+ (* -1 (/ (+ a1 (* -1 a1)) a2)) (+ (* -1 (/ (+ (* -1 (pow a1 2)) (pow a1 2)) (pow a2 2))) (* -1 (/ (pow (+ a1 (* -1 a1)) 2) (pow a2 2)))))))
(*.f64 (*.f64 a2 a2) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 a2))) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 (+.f64 (/.f64 #s(literal 0 binary64) a2) (/.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (* -1 (/ (+ a1 (* -1 a1)) a2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 0 binary64) a2)))
(* (pow a2 2) (+ 1 (* -1 (/ (- (* -1 (/ (- (pow a1 2) (+ (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (* -1 (pow (+ a1 (* -1 a1)) 2)))) a2)) (* -1 (+ a1 (* -1 a1)))) a2))))
(*.f64 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (+.f64 (*.f64 a1 a1) #s(literal 0 binary64)) a2) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) a2))))
(* (pow a2 2) (+ 1 (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* (+ a1 (* -1 a1)) (+ (* -1 (pow a1 2)) (pow a1 2))) a2)) (+ (* -1 (/ (* (+ a1 (* -1 a1)) (- (pow a1 2) (+ (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (* -1 (pow (+ a1 (* -1 a1)) 2))))) a2)) (+ (* -1 (/ (+ (* -1 (pow a1 3)) (pow a1 3)) a2)) (pow a1 2)))) (+ (* -1 (+ (* -1 (pow a1 2)) (pow a1 2))) (* -1 (pow (+ a1 (* -1 a1)) 2)))) a2)) (* -1 (+ a1 (* -1 a1)))) a2))))
(*.f64 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (+.f64 (+.f64 (+.f64 (/.f64 #s(literal 0 binary64) a2) (/.f64 #s(literal 0 binary64) a2)) (+.f64 (*.f64 a1 a1) (/.f64 #s(literal 0 binary64) a2))) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) a2)) #s(literal 0 binary64)) a2)))
(* -1 (pow a2 4))
(-.f64 #s(literal 0 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)) (pow a1 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 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal -1 binary64)))
(* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))
(*.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal -1 binary64)))
(* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))
(*.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal -1 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 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal -1 binary64)))
(* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))
(*.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal -1 binary64)))
(* (pow a2 4) (- (/ (pow a1 4) (pow a2 4)) 1))
(*.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64))) #s(literal -1 binary64)))
(* -1 (pow a2 2))
(-.f64 #s(literal 0 binary64) (*.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)) (pow a1 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 (*.f64 a1 a1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(* (pow a1 2) (- (+ 1 (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (pow a1 4)))) (/ (pow a2 2) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 0 binary64) (pow.f64 a1 #s(literal 4 binary64)))) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(* (pow a1 2) (- (+ 1 (/ (* (pow a2 2) (+ (* -1 (pow a2 4)) (pow a2 4))) (pow a1 6))) (+ (* -1 (/ (pow a2 4) (pow a1 4))) (+ (/ (pow a2 2) (pow a1 2)) (/ (pow a2 4) (pow a1 4))))))
(*.f64 (*.f64 a1 a1) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 0 binary64) (pow.f64 a1 #s(literal 6 binary64)))) (-.f64 (+.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (*.f64 a1 a1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(* (pow a1 2) (- (+ 1 (* -1 (/ (+ (* -1 (pow a2 4)) (pow a2 4)) (pow a1 4)))) (/ (pow a2 2) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 0 binary64) (pow.f64 a1 #s(literal 4 binary64)))) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(* (pow a1 2) (- (+ 1 (/ (* (pow a2 2) (+ (* -1 (pow a2 4)) (pow a2 4))) (pow a1 6))) (+ (* -1 (/ (pow a2 4) (pow a1 4))) (+ (/ (pow a2 2) (pow a1 2)) (/ (pow a2 4) (pow a1 4))))))
(*.f64 (*.f64 a1 a1) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 0 binary64) (pow.f64 a1 #s(literal 6 binary64)))) (-.f64 (+.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))))))
(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) (- (* -1 (/ (+ (* -1 (pow a1 4)) (pow a1 4)) (pow a2 4))) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))))
(*.f64 (*.f64 a2 a2) (-.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(* (pow a2 2) (- (/ (* (pow a1 2) (+ (* -1 (pow a1 4)) (pow a1 4))) (pow a2 6)) (+ 1 (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (pow a1 4) (pow a2 4))) (/ (pow a1 4) (pow a2 4)))))))
(*.f64 (*.f64 a2 a2) (-.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (/.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) (- (* -1 (/ (+ (* -1 (pow a1 4)) (pow a1 4)) (pow a2 4))) (+ 1 (* -1 (/ (pow a1 2) (pow a2 2))))))
(*.f64 (*.f64 a2 a2) (-.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(* (pow a2 2) (- (/ (* (pow a1 2) (+ (* -1 (pow a1 4)) (pow a1 4))) (pow a2 6)) (+ 1 (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (pow a1 4) (pow a2 4))) (/ (pow a1 4) (pow a2 4)))))))
(*.f64 (*.f64 a2 a2) (-.f64 (/.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 6 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.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)))
(+ (* -1 (* (pow a1 2) (pow a2 2))) (* -1 (pow a2 4)))
(-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (pow.f64 a2 #s(literal 4 binary64)))
(+ (* -1 (* (pow a1 2) (pow a2 2))) (* -1 (pow a2 4)))
(-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (pow.f64 a2 #s(literal 4 binary64)))
(+ (* -1 (* (pow a1 2) (pow a2 2))) (* -1 (pow a2 4)))
(-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (pow.f64 a2 #s(literal 4 binary64)))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))
(* (pow a1 2) (+ (* -1 (/ (pow a2 4) (pow a1 2))) (* -1 (pow a2 2))))
(*.f64 (*.f64 a1 a1) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 a1 a1))))
(* (pow a1 2) (+ (* -1 (/ (pow a2 4) (pow a1 2))) (* -1 (pow a2 2))))
(*.f64 (*.f64 a1 a1) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 a1 a1))))
(* (pow a1 2) (+ (* -1 (/ (pow a2 4) (pow a1 2))) (* -1 (pow a2 2))))
(*.f64 (*.f64 a1 a1) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 a1 a1))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))
(* (pow a1 2) (+ (* -1 (/ (pow a2 4) (pow a1 2))) (* -1 (pow a2 2))))
(*.f64 (*.f64 a1 a1) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 a1 a1))))
(* (pow a1 2) (+ (* -1 (/ (pow a2 4) (pow a1 2))) (* -1 (pow a2 2))))
(*.f64 (*.f64 a1 a1) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 a1 a1))))
(* (pow a1 2) (+ (* -1 (/ (pow a2 4) (pow a1 2))) (* -1 (pow a2 2))))
(*.f64 (*.f64 a1 a1) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (*.f64 a1 a1))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))
(* (pow a2 2) (+ (* -1 (pow a1 2)) (* -1 (pow a2 2))))
(*.f64 (*.f64 a2 a2) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(* (pow a2 2) (+ (* -1 (pow a1 2)) (* -1 (pow a2 2))))
(*.f64 (*.f64 a2 a2) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(* (pow a2 2) (+ (* -1 (pow a1 2)) (* -1 (pow a2 2))))
(*.f64 (*.f64 a2 a2) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(* -1 (pow a2 4))
(-.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64)))
(* (pow a2 4) (- (* -1 (/ (pow a1 2) (pow a2 2))) 1))
(*.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) #s(literal -1 binary64)))
(* (pow a2 4) (- (* -1 (/ (pow a1 2) (pow a2 2))) 1))
(*.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) #s(literal -1 binary64)))
(* (pow a2 4) (- (* -1 (/ (pow a1 2) (pow a2 2))) 1))
(*.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) #s(literal -1 binary64)))
(* -1 (pow a2 4))
(-.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64)))
(* (pow a2 4) (- (* -1 (/ (pow a1 2) (pow a2 2))) 1))
(*.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) #s(literal -1 binary64)))
(* (pow a2 4) (- (* -1 (/ (pow a1 2) (pow a2 2))) 1))
(*.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) #s(literal -1 binary64)))
(* (pow a2 4) (- (* -1 (/ (pow a1 2) (pow a2 2))) 1))
(*.f64 (pow.f64 a2 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) #s(literal -1 binary64)))
(/ -1 (pow a2 2))
(/.f64 #s(literal -1 binary64) (*.f64 a2 a2))
(- (* -1 (/ (pow a1 2) (pow a2 4))) (/ 1 (pow a2 2)))
(+.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 4 binary64)))) (/.f64 #s(literal -1 binary64) (*.f64 a2 a2)))
(- (* (pow a1 2) (- (* -1 (/ (pow a1 2) (pow a2 6))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))
(+.f64 (*.f64 (*.f64 a1 a1) (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 #s(literal -1 binary64) (pow.f64 a2 #s(literal 4 binary64))))) (/.f64 #s(literal -1 binary64) (*.f64 a2 a2)))
(- (* (pow a1 2) (- (* (pow a1 2) (- (* -1 (/ (pow a1 2) (pow a2 8))) (/ 1 (pow a2 6)))) (/ 1 (pow a2 4)))) (/ 1 (pow a2 2)))
(+.f64 (*.f64 (*.f64 a1 a1) (+.f64 (*.f64 (*.f64 a1 a1) (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (pow.f64 a2 #s(literal 8 binary64))) (/.f64 #s(literal -1 binary64) (pow.f64 a2 #s(literal 6 binary64))))) (/.f64 #s(literal -1 binary64) (pow.f64 a2 #s(literal 4 binary64))))) (/.f64 #s(literal -1 binary64) (*.f64 a2 a2)))
(/ 1 (pow a1 2))
(/.f64 #s(literal 1 binary64) (*.f64 a1 a1))
(/ (+ 1 (/ (pow a2 2) (pow a1 2))) (pow a1 2))
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a1 a1))
(/ (+ 1 (+ (/ (pow a2 2) (pow a1 2)) (/ (pow a2 4) (pow a1 4)))) (pow a1 2))
(/.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 a1 a1))
(/ (+ 1 (+ (/ (pow a2 2) (pow a1 2)) (+ (/ (pow a2 4) (pow a1 4)) (/ (pow a2 6) (pow a1 6))))) (pow a1 2))
(/.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (*.f64 a1 a1))
(/ 1 (pow a1 2))
(/.f64 #s(literal 1 binary64) (*.f64 a1 a1))
(/ (+ 1 (/ (pow a2 2) (pow a1 2))) (pow a1 2))
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a1 a1))
(/ (+ 1 (+ (/ (pow a2 2) (pow a1 2)) (/ (pow a2 4) (pow a1 4)))) (pow a1 2))
(/.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64)))) (*.f64 a1 a1))
(/ (+ 1 (+ (/ (pow a2 2) (pow a1 2)) (+ (/ (pow a2 4) (pow a1 4)) (/ (pow a2 6) (pow a1 6))))) (pow a1 2))
(/.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (/.f64 (pow.f64 a2 #s(literal 4 binary64)) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (*.f64 a1 a1))
(/ 1 (pow a1 2))
(/.f64 #s(literal 1 binary64) (*.f64 a1 a1))
(+ (/ 1 (pow a1 2)) (/ (pow a2 2) (pow a1 4)))
(+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (/.f64 (*.f64 a2 a2) (pow.f64 a1 #s(literal 4 binary64))))
(+ (* (pow a2 2) (+ (/ 1 (pow a1 4)) (/ (pow a2 2) (pow a1 6)))) (/ 1 (pow a1 2)))
(+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a1 #s(literal 4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 a1 #s(literal 6 binary64))))))
(+ (* (pow a2 2) (+ (* (pow a2 2) (+ (/ 1 (pow a1 6)) (/ (pow a2 2) (pow a1 8)))) (/ 1 (pow a1 4)))) (/ 1 (pow a1 2)))
(+.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a1 #s(literal 4 binary64))) (*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 a1 #s(literal 6 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 a1 #s(literal 8 binary64))))))))
(/ -1 (pow a2 2))
(/.f64 #s(literal -1 binary64) (*.f64 a2 a2))
(/ (- (* -1 (/ (pow a1 2) (pow a2 2))) 1) (pow a2 2))
(/.f64 (+.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) #s(literal -1 binary64)) (*.f64 a2 a2))
(/ (- (+ (* -1 (/ (pow a1 2) (pow a2 2))) (* -1 (/ (pow a1 4) (pow a2 4)))) 1) (pow a2 2))
(/.f64 (+.f64 (-.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) #s(literal -1 binary64)) (*.f64 a2 a2))
(/ (- (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (pow a1 4) (pow a2 4))) (* -1 (/ (pow a1 6) (pow a2 6))))) 1) (pow a2 2))
(/.f64 (+.f64 (-.f64 (-.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) #s(literal -1 binary64)) (*.f64 a2 a2))
(/ -1 (pow a2 2))
(/.f64 #s(literal -1 binary64) (*.f64 a2 a2))
(/ (- (* -1 (/ (pow a1 2) (pow a2 2))) 1) (pow a2 2))
(/.f64 (+.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) #s(literal -1 binary64)) (*.f64 a2 a2))
(/ (- (+ (* -1 (/ (pow a1 2) (pow a2 2))) (* -1 (/ (pow a1 4) (pow a2 4)))) 1) (pow a2 2))
(/.f64 (+.f64 (-.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) #s(literal -1 binary64)) (*.f64 a2 a2))
(/ (- (+ (* -1 (/ (pow a1 2) (pow a2 2))) (+ (* -1 (/ (pow a1 4) (pow a2 4))) (* -1 (/ (pow a1 6) (pow a2 6))))) 1) (pow a2 2))
(/.f64 (+.f64 (-.f64 (-.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 (pow.f64 a1 #s(literal 4 binary64)) (pow.f64 a2 #s(literal 4 binary64)))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) #s(literal -1 binary64)) (*.f64 a2 a2))
(* -1 (pow a2 6))
(-.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 6 binary64)))
(- (pow a1 6) (pow a2 6))
(-.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))
(- (pow a1 6) (pow a2 6))
(-.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))
(- (pow a1 6) (pow a2 6))
(-.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))
(pow a1 6)
(pow.f64 a1 #s(literal 6 binary64))
(* (pow a1 6) (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(* (pow a1 6) (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(* (pow a1 6) (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(pow a1 6)
(pow.f64 a1 #s(literal 6 binary64))
(* (pow a1 6) (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(* (pow a1 6) (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(* (pow a1 6) (+ 1 (* -1 (/ (pow a2 6) (pow a1 6)))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))
(pow a1 6)
(pow.f64 a1 #s(literal 6 binary64))
(+ (* -1 (pow a2 6)) (pow a1 6))
(-.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))
(+ (* -1 (pow a2 6)) (pow a1 6))
(-.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))
(+ (* -1 (pow a2 6)) (pow a1 6))
(-.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64)))
(* -1 (pow a2 6))
(-.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 6 binary64)))
(* (pow a2 6) (- (/ (pow a1 6) (pow a2 6)) 1))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) #s(literal -1 binary64)))
(* (pow a2 6) (- (/ (pow a1 6) (pow a2 6)) 1))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) #s(literal -1 binary64)))
(* (pow a2 6) (- (/ (pow a1 6) (pow a2 6)) 1))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) #s(literal -1 binary64)))
(* -1 (pow a2 6))
(-.f64 #s(literal 0 binary64) (pow.f64 a2 #s(literal 6 binary64)))
(* (pow a2 6) (- (/ (pow a1 6) (pow a2 6)) 1))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) #s(literal -1 binary64)))
(* (pow a2 6) (- (/ (pow a1 6) (pow a2 6)) 1))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) #s(literal -1 binary64)))
(* (pow a2 6) (- (/ (pow a1 6) (pow a2 6)) 1))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (pow.f64 a2 #s(literal 6 binary64))) #s(literal -1 binary64)))

eval259.0ms (2.5%)

Compiler

Compiled 93492 to 6178 computations (93.4% saved)

prune257.0ms (2.4%)

Pruning

43 alts after pruning (37 fresh and 6 done)

PrunedKeptTotal
New1878161894
Fresh112132
Picked325
Done145
Total1893431936
Accuracy
100.0%
Counts
1936 → 43
Alt Table
Click to see full alt table
StatusAccuracyProgram
10.2%
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))
10.3%
(/.f64 (/.f64 (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
66.1%
(/.f64 (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (-.f64 a1 a2) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64)))
5.5%
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64)))
58.5%
(/.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))
15.9%
(/.f64 (/.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
10.2%
(/.f64 (/.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 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)))
68.9%
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
7.8%
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.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 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
18.5%
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
✓99.6%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
✓68.9%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
10.1%
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.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 (*.f64 (*.f64 a1 a1) (*.f64 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))))))) (sqrt.f64 #s(literal 2 binary64)))
14.2%
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) a1) a1))) (sqrt.f64 #s(literal 2 binary64)))
17.7%
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) a2) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
15.8%
(/.f64 (*.f64 (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
56.1%
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (/.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 a1 a2))
53.7%
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 a1 a2))
10.2%
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 a2 a2)) (*.f64 (+.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 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))))) (sqrt.f64 #s(literal 2 binary64)))
16.2%
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 a2 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
30.6%
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))
58.5%
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (-.f64 a1 a2))
✓99.2%
(/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
44.1%
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))) (sqrt.f64 #s(literal 2 binary64)))
99.2%
(/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
68.6%
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
62.9%
(/.f64 (*.f64 a1 (/.f64 (*.f64 a2 a2) a1)) (sqrt.f64 #s(literal 2 binary64)))
58.3%
(/.f64 (*.f64 a1 (*.f64 a1 (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))) (sqrt.f64 #s(literal 2 binary64)))
58.6%
(/.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 a2 a1) a2) a1)))) (sqrt.f64 #s(literal 2 binary64)))
99.2%
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) a2)))
11.7%
(/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
68.9%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
68.8%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
99.2%
(*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2)
✓99.1%
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
99.2%
(*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (cos.f64 th))
✓11.7%
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
59.8%
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
99.1%
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (cos.f64 th)) (*.f64 a2 a2))
37.9%
(*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
✓99.2%
(*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
99.1%
(*.f64 (cos.f64 th) (*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2) a2))
68.6%
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
Compiler

Compiled 3047 to 873 computations (71.3% saved)

regimes191.0ms (1.8%)

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

23.0ms
a2
23.0ms
a1
23.0ms
th
23.0ms
(cos.f64 th)
22.0ms
(*.f64 a2 a2)
Results
AccuracySegmentsBranch
99.7%1a1
99.7%1a2
99.7%1th
99.7%1(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
99.7%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
99.7%1(cos.f64 th)
99.7%1(*.f64 a1 a1)
99.7%1(*.f64 a2 a2)
Compiler

Compiled 59 to 40 computations (32.2% saved)

regimes179.0ms (1.7%)

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

7 calls:

46.0ms
a2
21.0ms
a1
21.0ms
th
20.0ms
(*.f64 a2 a2)
20.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 (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 37 to 28 computations (24.3% saved)

regimes149.0ms (1.4%)

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

7 calls:

21.0ms
a1
20.0ms
a2
20.0ms
th
19.0ms
(*.f64 a2 a2)
19.0ms
(cos.f64 th)
Results
AccuracySegmentsBranch
99.2%1a1
99.2%1a2
99.2%1th
99.2%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
99.2%1(cos.f64 th)
99.2%1(*.f64 a1 a1)
99.2%1(*.f64 a2 a2)
Compiler

Compiled 37 to 28 computations (24.3% saved)

regimes83.0ms (0.8%)

Counts
59 → 3
Calls
Call 1
Inputs
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.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 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 a1 (/.f64 (*.f64 a2 a2) a1)) (sqrt.f64 #s(literal 2 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 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.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 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(/.f64 (*.f64 a1 (*.f64 a1 (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))) (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 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (*.f64 a1 a1) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 a2 a1) a2) a1)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (+.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 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 (*.f64 (*.f64 th th) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 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 #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 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 a2 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) a2) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (/.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 a1 a2))
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 a1 a2)) (-.f64 a1 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (-.f64 a1 a2))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 a1 a2))
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 a2 a1)) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 a1 a2)) (*.f64 (-.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 a2 a1)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (-.f64 a1 a2) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1)) a1) a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.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)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))))) (-.f64 #s(literal 1 binary64) (*.f64 a2 (/.f64 a2 (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 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 a1) (*.f64 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 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.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 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 (*.f64 a1 a1) (*.f64 (*.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 (*.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 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 #s(literal -1 binary64) (*.f64 a2 a2)) (*.f64 (+.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 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.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 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 (/.f64 #s(literal 1 binary64) (+.f64 a1 a2)) (-.f64 a1 a2)) (*.f64 (+.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 (*.f64 (*.f64 a1 a1) (*.f64 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))))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64)))
Outputs
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
Calls

5 calls:

17.0ms
a2
16.0ms
a1
16.0ms
(*.f64 a2 a2)
16.0ms
th
15.0ms
(*.f64 a1 a1)
Results
AccuracySegmentsBranch
68.9%1a1
68.9%1a2
72.2%3th
68.9%1(*.f64 a1 a1)
68.9%1(*.f64 a2 a2)
Compiler

Compiled 24 to 17 computations (29.2% saved)

regimes16.0ms (0.2%)

Counts
8 → 3
Calls
Call 1
Inputs
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.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 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) a1))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 a1 (/.f64 (*.f64 a2 a2) a1)) (sqrt.f64 #s(literal 2 binary64)))
Outputs
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
Calls

5 calls:

4.0ms
a1
3.0ms
th
3.0ms
a2
3.0ms
(*.f64 a2 a2)
3.0ms
(*.f64 a1 a1)
Results
AccuracySegmentsBranch
68.6%1a1
68.6%1(*.f64 a1 a1)
68.6%1a2
68.6%1(*.f64 a2 a2)
71.9%3th
Compiler

Compiled 24 to 17 computations (29.2% saved)

regimes8.0ms (0.1%)

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

3 calls:

3.0ms
a2
3.0ms
th
2.0ms
(*.f64 a2 a2)
Results
AccuracySegmentsBranch
68.6%1a2
68.6%1(*.f64 a2 a2)
68.6%1th
Compiler

Compiled 14 to 10 computations (28.6% saved)

regimes9.0ms (0.1%)

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
3 → 1
Calls
Call 1
Inputs
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
Outputs
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
Calls

4 calls:

3.0ms
a1
2.0ms
th
2.0ms
a2
2.0ms
(*.f64 a1 a1)
Results
AccuracySegmentsBranch
11.7%1th
11.7%1a1
11.7%1(*.f64 a1 a1)
11.7%1a2
Compiler

Compiled 18 to 13 computations (27.8% saved)

bsearch28.0ms (0.3%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
15.0ms
1.7306205878565394e+176
5.705539065767626e+176
10.0ms
3.7878052102758244e+66
7.475191468511904e+66
Results
20.0ms144×0valid
Compiler

Compiled 242 to 187 computations (22.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 15.0ms
ival-mult: 7.0ms (46.9% of total)
ival-cos: 5.0ms (33.5% of total)
ival-div: 1.0ms (6.7% of total)
ival-add: 1.0ms (6.7% of total)
ival-sqrt: 1.0ms (6.7% of total)
const: 0.0ms (0% of total)
backward-pass: 0.0ms (0% of total)

bsearch25.0ms (0.2%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
13.0ms
1.7306205878565394e+176
5.705539065767626e+176
10.0ms
3.7878052102758244e+66
7.475191468511904e+66
Results
17.0ms144×0valid
Compiler

Compiled 226 to 179 computations (20.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 12.0ms
ival-cos: 5.0ms (42.3% of total)
ival-mult: 4.0ms (33.8% of total)
ival-div: 1.0ms (8.5% of total)
ival-add: 1.0ms (8.5% of total)
ival-sqrt: 1.0ms (8.5% of total)
const: 0.0ms (0% of total)
backward-pass: 0.0ms (0% of total)

simplify9.0ms (0.1%)

Algorithm
1×egg-herbie
Rules
18×*-commutative_binary64
10×+-commutative_binary64
8×sub-neg_binary64
8×neg-mul-1_binary64
6×neg-sub0_binary64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
029100
144100
251100
358100
463100
566100
667100
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 (cos.f64 th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(if (<=.f64 th #s(literal 4800000000000000336178273218325571899635611016691514889466009354240 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (if (<=.f64 th #s(literal 359999999999999991434348494388764203892771908674980746875228519117758764136524886165345203815886865229445901677275329787338879596009280537891939788066096758833466050886848479232 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(if (<=.f64 th #s(literal 4800000000000000336178273218325571899635611016691514889466009354240 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (if (<=.f64 th #s(literal 359999999999999991434348494388764203892771908674980746875228519117758764136524886165345203815886865229445901677275329787338879596009280537891939788066096758833466050886848479232 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
Outputs
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(*.f64 (cos.f64 th) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(if (<=.f64 th #s(literal 4800000000000000336178273218325571899635611016691514889466009354240 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (if (<=.f64 th #s(literal 359999999999999991434348494388764203892771908674980746875228519117758764136524886165345203815886865229445901677275329787338879596009280537891939788066096758833466050886848479232 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(if (<=.f64 th #s(literal 4800000000000000336178273218325571899635611016691514889466009354240 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (if (<=.f64 th #s(literal 359999999999999991434348494388764203892771908674980746875228519117758764136524886165345203815886865229445901677275329787338879596009280537891939788066096758833466050886848479232 binary64)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(if (<=.f64 th #s(literal 4800000000000000336178273218325571899635611016691514889466009354240 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (if (<=.f64 th #s(literal 359999999999999991434348494388764203892771908674980746875228519117758764136524886165345203815886865229445901677275329787338879596009280537891939788066096758833466050886848479232 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(if (<=.f64 th #s(literal 4800000000000000336178273218325571899635611016691514889466009354240 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (if (<=.f64 th #s(literal 359999999999999991434348494388764203892771908674980746875228519117758764136524886165345203815886865229445901677275329787338879596009280537891939788066096758833466050886848479232 binary64)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))

soundness2.1s (20.2%)

Rules
5134×*-lowering-*.f32
5134×*-lowering-*.f64
4408×*-lowering-*.f32
4408×*-lowering-*.f64
4346×*-lowering-*.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
06464153
122932882
0106742882
02195
110795
272195
3799095
0808195
010127266
137044990
0103504990
030149
1185117
21598111
08667111
02574328
18453450
231153234
082133234
01432136
15061796
219861700
347641676
089351676
01560
17760
271060
0874760
01211
12811
25911
39411
412011
512411
012411
Stop Event
1×fuel
1×iter limit
1×saturated
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
1×iter limit
1×node limit
1×iter limit
1×node limit
Compiler

Compiled 588 to 354 computations (39.8% saved)

preprocess97.0ms (0.9%)

Remove

(sort a1 a2)

(abs th)

(abs a2)

(abs a1)

Compiler

Compiled 776 to 434 computations (44.1% saved)

end0.0ms (0%)

Profiling

Loading profile data...