Migdal et al, Equation (64)

Time bar (total: 10.8s)

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.3s (12.5%)

Results
1.1s8256×0valid
Precisions
Click to see histograms. Total time spent on operations: 720.0ms
ival-cos: 274.0ms (38.1% of total)
ival-mult: 220.0ms (30.6% of total)
ival-sqrt: 93.0ms (12.9% of total)
ival-div: 77.0ms (10.7% of total)
ival-add: 40.0ms (5.6% of total)
const: 13.0ms (1.8% of total)
backward-pass: 3.0ms (0.4% of total)
Bogosity

preprocess71.0ms (0.7%)

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

Useful iterations: 0 (0.0ms)

IterNodesCost
041113
1146113
2430113
31252110
43484110
57750110
01211
12911
26011
39511
412111
512511
012511
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 (*.f64 (cos.f64 th) (+.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) (fast-isqrt 2)) (+ (square a1) (square a2)))
(+ (* (/ (cos th) (sqrt 2)) (* (neg a1) (neg a1))) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
(* (* (cos th) (fast-isqrt 2)) (+ (square a1) (square a2)))
(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* (neg a2) (neg a2))))
(* (* (cos th) (fast-isqrt 2)) (+ (square a1) (square a2)))
(+ (* (/ (cos (neg th)) (sqrt 2)) (* a1 a1)) (* (/ (cos (neg th)) (sqrt 2)) (* a2 a2)))
(* (* (cos th) (fast-isqrt 2)) (+ (square a1) (square a2)))
(neg (+ (* (/ (cos th) (sqrt 2)) (* (neg a1) (neg a1))) (* (/ (cos th) (sqrt 2)) (* a2 a2))))
(* (* (cos th) (fast-isqrt 2)) (fnmsub a1 a1 (square a2)))
(neg (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* (neg a2) (neg a2)))))
(* (* (cos th) (fast-isqrt 2)) (fnmsub a1 a1 (square a2)))
(neg (+ (* (/ (cos (neg th)) (sqrt 2)) (* a1 a1)) (* (/ (cos (neg th)) (sqrt 2)) (* a2 a2))))
(* (* (cos th) (fast-isqrt 2)) (fnmsub a1 a1 (square a2)))
(+ (* (/ (cos th) (sqrt 2)) (* a2 a2)) (* (/ (cos th) (sqrt 2)) (* a1 a1)))
(* (* (cos th) (fast-isqrt 2)) (+ (square a1) (square a2)))
(+ (* (/ (cos a1) (sqrt 2)) (* th th)) (* (/ (cos a1) (sqrt 2)) (* a2 a2)))
(* (cos a1) (/ (fma th th (square a2)) (sqrt 2)))
(+ (* (/ (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)

explain169.0ms (1.6%)

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
114.0ms512×0valid
Compiler

Compiled 142 to 38 computations (73.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 40.0ms
ival-cos: 17.0ms (42.2% of total)
ival-mult: 12.0ms (29.8% of total)
ival-div: 4.0ms (9.9% of total)
ival-sqrt: 4.0ms (9.9% 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 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
▶99.6%
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
Compiler

Compiled 38 to 23 computations (39.5% saved)

simplify14.0ms (0.1%)

Algorithm
1×egg-herbie
Localize:

Found 8 expressions of interest:

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

Useful iterations: 0 (0.0ms)

IterNodesCost
01580
14080
27580
310780
412480
512880
012880
Stop Event
1×iter limit
1×saturated
Calls
Call 1
Inputs
(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
(* (/ (cos th) (sqrt 2)) (* a1 a1))
(/ (cos th) (sqrt 2))
(cos th)
th
(sqrt 2)
2
(* a1 a1)
a1
(* (/ (cos th) (sqrt 2)) (* a2 a2))
(* a2 a2)
a2
(/ (* (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
Outputs
(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (/ (cos th) (sqrt 2)) (* a1 a1))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(/ (cos th) (sqrt 2))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(cos th)
(cos.f64 th)
th
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(* a1 a1)
(*.f64 a1 a1)
a1
(* (/ (cos th) (sqrt 2)) (* a2 a2))
(/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(* a2 a2)
(*.f64 a2 a2)
a2
(/ (* (cos th) (+ (* a1 a1) (* a2 a2))) (sqrt 2))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (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)

localize92.0ms (0.9%)

Localize:

Found 8 expressions of interest:

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

Compiled 104 to 16 computations (84.6% saved)

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

series22.0ms (0.2%)

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

51 calls:

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

rewrite327.0ms (3%)

Algorithm
1×batch-egg-rewrite
Rules
5250×*-lowering-*.f32
5250×*-lowering-*.f64
2132×/-lowering-/.f32
2132×/-lowering-/.f64
1422×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01560
18260
273360
0888560
Stop Event
1×iter limit
1×node limit
Counts
9 → 533
Calls
Call 1
Inputs
(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
(* (/ (cos th) (sqrt 2)) (* a1 a1))
(/ (cos th) (sqrt 2))
(cos th)
(/ (* (cos th) (+ (* a1 a1) (* a2 a2))) (sqrt 2))
(* (cos th) (+ (* a1 a1) (* a2 a2)))
(+ (* a1 a1) (* a2 a2))
(* (/ (cos th) (sqrt 2)) (* a2 a2))
(sqrt 2)
Outputs
(+.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.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))))
(+.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 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(-.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 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(-.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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(fma.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)))
(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 a1 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(fma.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 a2 a2)))
(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) (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(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 (*.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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(neg.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (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 (*.f64 a1 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 (*.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 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(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 (*.f64 a1 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 (*.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 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 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 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 (+.f64 (*.f64 a1 a1) (*.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 (*.f64 a1 (*.f64 a1 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 a2 (*.f64 a2 (-.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 (*.f64 a1 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 (*.f64 a1 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 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 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 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.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 (*.f64 a1 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 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 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 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 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.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 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 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 a2 (*.f64 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 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 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) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 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 (*.f64 a1 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 (*.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 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (-.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 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (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 (*.f64 a1 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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 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 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 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 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (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 (*.f64 a1 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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (*.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 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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (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 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.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 (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 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 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 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 (*.f64 a1 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 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #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 (*.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 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 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 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 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 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 a2 (*.f64 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 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 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) (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 #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 (*.f64 a1 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 (*.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 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 th) (-.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 a1) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 th))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 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 (cos.f64 th) (*.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 (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 (/.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 (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)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (+.f64 (*.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 #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 (cos.f64 th) #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 a1 a1) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 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 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 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 (*.f64 a1 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))))))
(neg.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(*.f64 a1 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 #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 (cos.f64 th) (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) a1)
(*.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 a1 (cos.f64 th)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a1))
(*.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 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 a1 (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 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal -1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 (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))))
(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 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.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))))
(+.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 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(-.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 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(-.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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(fma.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)))
(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 a1 (/.f64 (*.f64 (cos.f64 th) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(fma.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 a2 a2)))
(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) (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(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 (*.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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(neg.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (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 (*.f64 a1 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 (*.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 2 binary64)) (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(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 (*.f64 a1 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 (*.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 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 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 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 (+.f64 (*.f64 a1 a1) (*.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 (*.f64 a1 (*.f64 a1 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 a2 (*.f64 a2 (-.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 (*.f64 a1 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 (*.f64 a1 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 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 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 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.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 (*.f64 a1 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 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 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 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 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))) (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.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 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 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 a2 (*.f64 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 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 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) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 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 (*.f64 a1 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 (*.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 2 binary64))) (*.f64 (/.f64 (cos.f64 th) (-.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 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (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 (*.f64 a1 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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 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 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 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 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (pow.f64 (/.f64 (cos.f64 th) (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 (*.f64 a1 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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (*.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 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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (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 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.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 (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 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 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 th) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 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 (*.f64 a1 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 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #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 (*.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 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 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 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 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 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 a2 (*.f64 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 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 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) (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 #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 (*.f64 a1 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 (*.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 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 th) (-.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 a1) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 th))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 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 (cos.f64 th) (*.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 (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 (/.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 (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)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (+.f64 (*.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 #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 (cos.f64 th) #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 a1 a1) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 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 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 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 (*.f64 a1 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 (cos.f64 th) (*.f64 a1 a1)) (*.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 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))) (neg.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))))
(-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(-.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 a1 (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(fma.f64 (*.f64 a1 a1) (cos.f64 th) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(fma.f64 a2 (*.f64 a2 (cos.f64 th)) (*.f64 (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 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 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 #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 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (cos.f64 th))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 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 a2 (*.f64 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 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 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 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 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 (*.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 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (+.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 a2 a2)))) (cos.f64 th)) (-.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 (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 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 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)))) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (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 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 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)))))) (cos.f64 th)))
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 th)))
(*.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 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 a2 (*.f64 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 (*.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 (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 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (cos.f64 th)) (/.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 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (cos.f64 th) (+.f64 a1 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a1 a2)) (/.f64 (cos.f64 th) (-.f64 a1 a2)))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(-.f64 (/.f64 (*.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 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 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 #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 (*.f64 a1 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 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 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 (*.f64 (*.f64 a1 (*.f64 a1 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 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 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 (*.f64 a1 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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (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)) (*.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 (*.f64 a1 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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 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 (*.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 #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 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 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 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 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (-.f64 (*.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))
(neg.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.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)))
(/.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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (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 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) 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 (*.f64 (cos.f64 th) a2) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (*.f64 a2 (cos.f64 th)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2))
(*.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 (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 #s(literal 0 binary64) (cos.f64 th)) #s(literal -1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (*.f64 a2 a2) (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 a2 (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 (cos.f64 th) (*.f64 a2 a2)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(sqrt.f64 #s(literal 2 binary64))
(neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(/.f64 (-.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)))

simplify373.0ms (3.5%)

Algorithm
1×egg-herbie
Rules
4708×*-lowering-*.f32
4708×*-lowering-*.f64
3800×+-lowering-+.f64
3800×+-lowering-+.f32
1754×times-frac
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
01582679
15721963
223471839
359551823
086821823
Stop Event
1×iter limit
1×node limit
Counts
204 → 204
Calls
Call 1
Inputs
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a1 2) (sqrt 2))))))) (/ (pow a1 2) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/ 1 (sqrt 2))
(+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))
(+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
1
(+ 1 (* -1/2 (pow th 2)))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(/ (+ (pow 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))))
(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))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2))))))) (/ (pow a2 2) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
Outputs
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* -1/2 (/ (pow a2 2) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* 1/24 (/ (pow a1 2) (sqrt 2))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (pow a1 2) (sqrt 2))) (* -1/720 (/ (pow a2 2) (sqrt 2))))))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 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 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 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 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 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 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 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 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 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 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 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 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))) (/ (pow a1 2) (sqrt 2)))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a1 2) (sqrt 2))) (* 1/24 (/ (* (pow a1 2) (pow th 2)) (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.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) (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 th th) (*.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.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 th (*.f64 th #s(literal -1/2 binary64)))) (/.f64 (*.f64 a1 a1) (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)))
(/ (* (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 th (*.f64 th #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 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)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow th 2)))
(+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 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 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 th (*.f64 th #s(literal -1/2 binary64)))) (+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (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 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.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 th th) (*.f64 (*.f64 (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (+.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (+.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 (cos.f64 th) (+.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 (cos.f64 th) (+.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 (cos.f64 th) (+.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 (cos.f64 th) (+.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 (cos.f64 th) (+.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 (cos.f64 th) (+.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 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a1 (*.f64 a1 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 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 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 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 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 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 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 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 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 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 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 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 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 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 th (*.f64 th #s(literal -1/2 binary64)))) (+.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 th (*.f64 th #s(literal -1/2 binary64)))) (*.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 th th) (*.f64 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (pow a1 2) (cos th))
(*.f64 a1 (*.f64 a1 (cos.f64 th)))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (pow a1 2) (cos th))
(*.f64 a1 (*.f64 a1 (cos.f64 th)))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (pow a1 2) (cos th))
(*.f64 a1 (*.f64 a1 (cos.f64 th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.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 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.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 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(pow a2 2)
(*.f64 a2 a2)
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(pow a1 2)
(*.f64 a1 a1)
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (*.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 a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2))))))) (/ (pow a2 2) (sqrt 2)))
(+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) (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 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (/.f64 (*.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)))

eval159.0ms (1.5%)

Compiler

Compiled 21760 to 1298 computations (94% saved)

prune87.0ms (0.8%)

Pruning

11 alts after pruning (11 fresh and 0 done)

PrunedKeptTotal
New82211833
Fresh000
Picked202
Done000
Total82411835
Accuracy
100.0%
Counts
835 → 11
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.3%
(/.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)))
▶67.2%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
59.9%
(/.f64 (*.f64 (+.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)))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
▶61.0%
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
60.6%
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
99.4%
(/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
▶99.4%
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
99.3%
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
▶99.6%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
▶99.6%
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
Compiler

Compiled 402 to 282 computations (29.9% saved)

simplify246.0ms (2.3%)

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-diff0
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
✓cost-diff0
(cos.f64 th)
✓cost-diff0
(*.f64 a2 (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 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
✓cost-diff0
(+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
✓cost-diff0
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
✓cost-diff0
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (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
(cos.f64 th)
✓cost-diff0
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
✓cost-diff0
(pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))
✓cost-diff0
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
Rules
4464×sum4-define
2688×sum5-define
2412×*-lowering-*.f32
2412×*-lowering-*.f64
1376×+-lowering-+.f64
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
029213
182204
2230204
3720204
42233204
54925204
65337204
75727204
85759204
95759204
08271204
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(* (pow 2 -1/2) (* (cos th) (+ (* a1 a1) (* a2 a2))))
(pow 2 -1/2)
2
-1/2
(* (cos th) (+ (* a1 a1) (* a2 a2)))
(cos th)
th
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
a1
(* a2 a2)
a2
(/ (+ (* a1 a1) (* a2 a2)) (sqrt 2))
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
a1
(* a2 a2)
a2
(sqrt 2)
2
(/ (* (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24))))) (+ (* a1 a1) (* a2 a2))) (sqrt 2))
(* (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24))))) (+ (* a1 a1) (* a2 a2)))
(+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24)))))
1
(* th (* th (+ -1/2 (* (* th th) 1/24))))
th
(* th (+ -1/2 (* (* th th) 1/24)))
(+ -1/2 (* (* th th) 1/24))
-1/2
(* (* th th) 1/24)
(* th th)
1/24
(+ (* 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
(* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2)))
(/ (cos th) (sqrt 2))
(cos th)
th
(sqrt 2)
2
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
a1
(* a2 a2)
a2
Outputs
(* (pow 2 -1/2) (* (cos th) (+ (* a1 a1) (* a2 a2))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(pow 2 -1/2)
(pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))
2
#s(literal 2 binary64)
-1/2
#s(literal -1/2 binary64)
(* (cos th) (+ (* a1 a1) (* a2 a2)))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(cos th)
(cos.f64 th)
th
(+ (* a1 a1) (* a2 a2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* a1 a1)
(*.f64 a1 a1)
a1
(* a2 a2)
(*.f64 a2 a2)
a2
(/ (+ (* 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)
(/ (* (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24))))) (+ (* a1 a1) (* a2 a2))) (sqrt 2))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (sqrt.f64 #s(literal 2 binary64)))
(* (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24))))) (+ (* a1 a1) (* a2 a2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24)))))
(+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))
1
#s(literal 1 binary64)
(* th (* th (+ -1/2 (* (* th th) 1/24))))
(*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))
th
(* th (+ -1/2 (* (* th th) 1/24)))
(*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))
(+ -1/2 (* (* th th) 1/24))
(+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))
-1/2
#s(literal -1/2 binary64)
(* (* th th) 1/24)
(*.f64 th (*.f64 th #s(literal 1/24 binary64)))
(* th th)
(*.f64 th th)
1/24
#s(literal 1/24 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 a2 (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64)))
(* a2 (* a2 (cos th)))
(*.f64 a2 (*.f64 (cos.f64 th) 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)
(* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2)))
(*.f64 (cos.f64 th) (/.f64 (+.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)
(+ (* a1 a1) (* a2 a2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* a1 a1)
(*.f64 a1 a1)
a1
(* a2 a2)
(*.f64 a2 a2)
a2

localize248.0ms (2.3%)

Localize:

Found 20 expressions of interest:

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

Compiled 259 to 30 computations (88.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 54.0ms
ival-mult: 22.0ms (40.8% of total)
ival-cos: 8.0ms (14.9% of total)
ival-div: 7.0ms (13% of total)
ival-add: 5.0ms (9.3% of total)
...c/correct-round.rkt:119:19: 4.0ms (7.4% of total)
ival-pow: 4.0ms (7.4% of total)
ival-sqrt: 2.0ms (3.7% of total)
const: 1.0ms (1.9% of total)
backward-pass: 0.0ms (0% of total)

series44.0ms (0.4%)

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

96 calls:

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

rewrite467.0ms (4.3%)

Algorithm
1×batch-egg-rewrite
Rules
3542×*-lowering-*.f32
3542×*-lowering-*.f64
3072×/-lowering-/.f32
3072×/-lowering-/.f64
1598×+-lowering-+.f64
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
029139
1155129
21263129
08447129
Stop Event
1×iter limit
1×node limit
Counts
19 → 920
Calls
Call 1
Inputs
(* (pow 2 -1/2) (* (cos th) (+ (* a1 a1) (* a2 a2))))
(pow 2 -1/2)
(* (cos th) (+ (* a1 a1) (* a2 a2)))
(cos th)
(/ (+ (* a1 a1) (* a2 a2)) (sqrt 2))
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
(* a2 a2)
(/ (* (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24))))) (+ (* a1 a1) (* a2 a2))) (sqrt 2))
(* (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24))))) (+ (* a1 a1) (* a2 a2)))
(+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24)))))
(* th (* th (+ -1/2 (* (* th th) 1/24))))
(/ (* a2 (* a2 (cos th))) (sqrt 2))
(* a2 (* a2 (cos th)))
(* a2 (cos th))
(* (/ (cos th) (sqrt 2)) (+ (* a1 a1) (* a2 a2)))
(/ (cos th) (sqrt 2))
(sqrt 2)
(* (* th th) 1/24)
Outputs
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(fma.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a2) a2 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a1) a1 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.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 #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)) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.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 (*.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 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (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 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 #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 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.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)))) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.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 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.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 (*.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 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 (*.f64 a2 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 #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 (*.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 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (/.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))) (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (/.f64 (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 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 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 (*.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 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (/.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 (*.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 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.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 (*.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 (*.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 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (cos.f64 th)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (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 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 (*.f64 a2 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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 #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 (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 (*.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 (*.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 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (/.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (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 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (+.f64 (*.f64 (*.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 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 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 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 (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)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (/.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 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.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 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.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 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.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 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.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 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (/.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 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.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)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.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 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 0 binary64) (/.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 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 a1 a1))) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))))) (*.f64 (-.f64 #s(literal 0 binary64) (/.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 0 binary64) (/.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 (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)))) (cos.f64 th))) (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 (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 #s(literal 0 binary64) (cos.f64 th)))) (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 0 binary64) (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)))) (cos.f64 th))) (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 #s(literal 0 binary64) (cos.f64 th)))) (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (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)))))) (neg.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 (neg.f64 (*.f64 (cos.f64 th) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.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 (*.f64 a2 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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (/.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (neg.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (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 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 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 (*.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 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 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64)) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64))) (+.f64 (*.f64 (*.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 (cos.f64 th) (*.f64 a1 a1)))) (-.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64))) (-.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(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 (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 (+.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 #s(literal 1 binary64) (/.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 (*.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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)) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (*.f64 (+.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 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 (*.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 #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 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)))) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (/.f64 #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 (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 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 (*.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (/.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))))))
(*.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)))
(*.f64 (*.f64 (/.f64 (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 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.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 (*.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 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 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.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 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a1 a2)) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a1 a2)))
(*.f64 (/.f64 (cos.f64 th) (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)) #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 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 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)))
(exp.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 4 binary64)) #s(literal -1/4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (+.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal -1/4 binary64))
(pow.f64 (exp.f64 #s(literal -1/2 binary64)) (log.f64 #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 (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 (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.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 a1 (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(fma.f64 (*.f64 a1 a1) (cos.f64 th) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(fma.f64 a2 (*.f64 (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)))
(/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.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)))) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))) (+.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 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.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)))) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (cos.f64 th)) (-.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 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 (*.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 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (-.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.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)))) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (-.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.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 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))) (neg.f64 (-.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (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 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 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 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(*.f64 (*.f64 (+.f64 (*.f64 (*.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 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)))) (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 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 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 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a1 a2)) (/.f64 (cos.f64 th) (-.f64 a1 a2)))
(*.f64 (/.f64 (cos.f64 th) (+.f64 a1 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)))
(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)))
(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)))))
(/.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 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 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 (*.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 (*.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 (*.f64 a2 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 (*.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 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 (*.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 (*.f64 a2 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 (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 (-.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 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.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))))) (neg.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 #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 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))))) (neg.f64 (*.f64 (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 (*.f64 a2 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 (*.f64 a2 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 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.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 #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 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (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 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.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)))) (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 (*.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))))))
(*.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 (*.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.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 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 #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 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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 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 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.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 (*.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 #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 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 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 (-.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 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (-.f64 #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 #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 (*.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2)))))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 #s(literal -1 binary64) (-.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 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))
(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 (*.f64 a1 a1) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 a1 a1))
(*.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)))
(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 (*.f64 a2 a2) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 a2 a2))
(*.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)))
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (sqrt.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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (/.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(neg.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #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 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (+.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 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))))
(/.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #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 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) #s(literal -1 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (sqrt.f64 #s(literal 2 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 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) #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 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (pow.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 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #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 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal -1 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 #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 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.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 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal -1/2 binary64)))
(+.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(+.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(+.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(+.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(+.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(-.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))
(fma.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(fma.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(fma.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(fma.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(fma.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(fma.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(fma.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(fma.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(fma.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) a2) a2 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(fma.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) a1) a1 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #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 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(/.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)))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.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 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #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 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (-.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 a2 a2)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 a2)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 a1 a1)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 a1 a1)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 a1 a1)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 a2 a2)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 a1 a1)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 a2)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a1 a1)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a1 a1)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a1 a1)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a1 a1)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 a1 a1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a1 a1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 a2 a2)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 a1 a1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 a2 a2)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a1 a1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 a2)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 a2)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.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 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))))))
(/.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 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(/.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 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))) (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))))))
(/.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 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 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 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))) (neg.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))) (neg.f64 (-.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 (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 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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)))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) #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 a1 a1) (*.f64 a2 a2)) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.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 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.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 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (-.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))
(/.f64 (-.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 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.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 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(*.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(*.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))))))
(*.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #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 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))))
(*.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (*.f64 (+.f64 (*.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 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a1 a2)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 a1 a2)))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 a1 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)))
(*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64))
(+.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (neg.f64 (/.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(-.f64 (/.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))
(fma.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64))
(fma.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) #s(literal 1 binary64))
(fma.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 th th) #s(literal 1 binary64))
(fma.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) th #s(literal 1 binary64))
(fma.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)) (+.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal -1 binary64))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (+.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (neg.f64 (+.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal -1 binary64)) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(/.f64 (neg.f64 (+.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal -1 binary64))) (neg.f64 (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (+.f64 (*.f64 (/.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))
(/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 (/.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) #s(literal 1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(*.f64 (+.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal -1 binary64))))
(+.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(+.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))
(+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) th) th) (*.f64 (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) th))
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th)))
(+.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th)) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th)))
(fma.f64 th (*.f64 #s(literal -1/2 binary64) th) (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))
(fma.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))
(fma.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) th) th (*.f64 (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) th))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (+.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th th)) #s(literal 1/13824 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/576 binary64))))))
(/.f64 (*.f64 th th) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(/.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th th)) #s(literal 1/13824 binary64))))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (+.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/576 binary64)))) (-.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th th)) #s(literal 1/13824 binary64)))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (+.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/576 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) #s(literal 3 binary64)) (pow.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (-.f64 (*.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) th) th) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) th) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) th) th) (*.f64 (*.f64 #s(literal -1/2 binary64) th) th)) (-.f64 (*.f64 (*.f64 (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) th) (*.f64 (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) th)) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) th) th) (*.f64 (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) th)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th)) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th)) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th)) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(/.f64 (-.f64 (*.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (*.f64 th (*.f64 #s(literal -1/2 binary64) th))) (*.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 (*.f64 th (*.f64 #s(literal -1/2 binary64) th)) (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))) (-.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) th) th) (*.f64 (*.f64 #s(literal -1/2 binary64) th) th)) (*.f64 (*.f64 (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) th) (*.f64 (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) th))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) th) th) (*.f64 (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) th)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th)) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th)) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (-.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th)) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(*.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))
(*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 th th))
(*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) th)
(*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64))
(*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th th)) #s(literal 1/13824 binary64))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (+.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #s(literal 1/2 binary64))))))
(*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/576 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(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 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (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) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (*.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 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 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(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 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 #s(literal 1 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) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (*.f64 (cos.f64 th) (-.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 #s(literal 1 binary64) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.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 #s(literal -1 binary64) (*.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a2) a2)
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) (*.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 #s(literal 0 binary64) (cos.f64 th)) #s(literal -1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a2 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (*.f64 (cos.f64 th) a2) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.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 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.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 #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 a2 (*.f64 (cos.f64 th) a2))
(*.f64 a2 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 th) a2))))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(*.f64 (*.f64 (cos.f64 th) a2) a2)
(*.f64 (*.f64 (cos.f64 th) a2) (neg.f64 (-.f64 #s(literal 0 binary64) a2)))
(*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 1 binary64))
(*.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 #s(literal -1 binary64) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 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 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(fma.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (cos.f64 th) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a1 (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))) a2 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a2) a2 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(fma.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a1) a1 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.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 #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)) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.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 (*.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 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (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 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 #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 #s(literal 0 binary64) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.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)))) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.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 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(/.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 (*.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 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 (*.f64 a2 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 #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 (*.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 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (/.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))) (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (/.f64 (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 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 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 (*.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 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (/.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 (*.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 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.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 (*.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 (*.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 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (cos.f64 th)) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (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 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 (*.f64 a2 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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 #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 (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 (*.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 (*.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 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (/.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))))
(/.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (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 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (/.f64 (+.f64 (*.f64 (*.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 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 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal -1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 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 (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)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) (/.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 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.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 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.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 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.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 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.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 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (/.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 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.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)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.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 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 0 binary64) (/.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 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 a1 a1))) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (cos.f64 th))))) (*.f64 (-.f64 #s(literal 0 binary64) (/.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 0 binary64) (/.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 (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)))) (cos.f64 th))) (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 (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 #s(literal 0 binary64) (cos.f64 th)))) (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 0 binary64) (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)))) (cos.f64 th))) (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 #s(literal 0 binary64) (cos.f64 th)))) (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (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)))))) (neg.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 (neg.f64 (*.f64 (cos.f64 th) (-.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 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.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 (*.f64 a2 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 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (/.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (neg.f64 (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (neg.f64 (*.f64 (/.f64 (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 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 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 (*.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 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 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64)) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64))) (+.f64 (*.f64 (*.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 (cos.f64 th) (*.f64 a1 a1)))) (-.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64))) (-.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(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 (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 (+.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 #s(literal 1 binary64) (/.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 (*.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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)) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (*.f64 (+.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 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 (*.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 #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 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)))) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (/.f64 #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 (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 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 (*.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (*.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) #s(literal -2 binary64)) (/.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))))))
(*.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal -1/4 binary64)))
(*.f64 (*.f64 (/.f64 (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 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.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 (*.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 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 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.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 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a1 a2)) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 a1 a2)))
(*.f64 (/.f64 (cos.f64 th) (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)) #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 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 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)))
(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 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.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 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 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 #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) (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 (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 #s(literal -1 binary64) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(*.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)))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(sqrt.f64 #s(literal 2 binary64))
(neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 th (*.f64 th #s(literal 1/24 binary64)))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(*.f64 #s(literal 1/24 binary64) (*.f64 th th))
(*.f64 (*.f64 th #s(literal 1/24 binary64)) th)

simplify344.0ms (3.2%)

Algorithm
1×egg-herbie
Rules
5324×+-lowering-+.f64
5324×+-lowering-+.f32
4952×*-lowering-*.f32
4952×*-lowering-*.f64
1270×distribute-lft-in
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
02505752
18894574
236304316
084384316
Stop Event
1×iter limit
1×node limit
Counts
384 → 384
Calls
Call 1
Inputs
(* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))
(+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(+ (pow a1 2) (pow a2 2))
(+ (* -1/2 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(+ (* (pow th 2) (+ (* -1/2 (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (+ (pow a1 2) (pow a2 2))))))) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (cos th) (+ (pow a1 2) (pow a2 2)))
(* (pow a2 2) (cos th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(* (pow a1 2) (cos th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (cos th))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (+ (cos th) (/ (* (pow a2 2) (cos th)) (pow a1 2))))
(* (pow a1 2) (cos th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(* (pow a2 2) (cos th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (cos th))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
1
(+ 1 (* -1/2 (pow th 2)))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(/ (pow a2 2) (sqrt 2))
(+ (/ (pow 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)
(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 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))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(* 1/24 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (+ (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 4) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2)))))))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (+ (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 4) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2)))))))
(* 1/24 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (+ (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 4) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2)))))))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (+ (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 4) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2)))))))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(+ (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(+ (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(+ (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(+ (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(+ (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(+ (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(+ (pow 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))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(* 1/24 (* (pow th 4) (+ (pow a1 2) (pow a2 2))))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (pow th 2))) (* 1/24 (+ (pow a1 2) (pow a2 2)))))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (pow th 2))) (+ (* 1/24 (+ (pow a1 2) (pow a2 2))) (+ (/ (pow a1 2) (pow th 4)) (/ (pow a2 2) (pow th 4))))))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (pow th 2))) (+ (* 1/24 (+ (pow a1 2) (pow a2 2))) (+ (/ (pow a1 2) (pow th 4)) (/ (pow a2 2) (pow th 4))))))
(* 1/24 (* (pow th 4) (+ (pow a1 2) (pow a2 2))))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (pow th 2))) (* 1/24 (+ (pow a1 2) (pow a2 2)))))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (pow th 2))) (+ (* 1/24 (+ (pow a1 2) (pow a2 2))) (+ (/ (pow a1 2) (pow th 4)) (/ (pow a2 2) (pow th 4))))))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (pow th 2))) (+ (* 1/24 (+ (pow a1 2) (pow a2 2))) (+ (/ (pow a1 2) (pow th 4)) (/ (pow a2 2) (pow th 4))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(+ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
(+ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
(+ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
(* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* (pow a1 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a1 2)))))
(* (pow a1 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a1 2)))))
(* (pow a1 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a1 2)))))
(* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* (pow a1 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a1 2)))))
(* (pow a1 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a1 2)))))
(* (pow a1 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a1 2)))))
(* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(+ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
(+ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
(+ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* (pow a2 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a2 2)))))
(* (pow a2 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a2 2)))))
(* (pow a2 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a2 2)))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* (pow a2 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a2 2)))))
(* (pow a2 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a2 2)))))
(* (pow a2 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/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) (- (* 1/24 (pow th 2)) 1/2)))
(* 1/24 (pow th 4))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(* (pow th 4) (- (+ 1/24 (/ 1 (pow th 4))) (* 1/2 (/ 1 (pow th 2)))))
(* (pow th 4) (- (+ 1/24 (/ 1 (pow th 4))) (* 1/2 (/ 1 (pow th 2)))))
(* 1/24 (pow th 4))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(* (pow th 4) (- (+ 1/24 (/ 1 (pow th 4))) (* 1/2 (/ 1 (pow th 2)))))
(* (pow th 4) (- (+ 1/24 (/ 1 (pow th 4))) (* 1/2 (/ 1 (pow th 2)))))
(* -1/2 (pow th 2))
(* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))
(* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))
(* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))
(* 1/24 (pow th 4))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(* 1/24 (pow th 4))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 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 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))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
Outputs
(* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (* -1/2 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* 1/24 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (+.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)))))
(+ (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))) (* (pow th 2) (+ (* -1/2 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))) (* (pow th 2) (+ (* -1/720 (* (pow th 2) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))) (* 1/24 (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2)))))))))
(+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 th (*.f64 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 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (cos th) (* (sqrt 1/2) (+ (pow a1 2) (pow a2 2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (*.f64 a1 a1))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (*.f64 a1 a1))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (*.f64 a1 a1))))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (*.f64 a1 a1))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (*.f64 a1 a1))))
(* (pow a1 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a2 2) (* (cos th) (sqrt 1/2))) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (*.f64 a1 a1))))
(* (pow a1 2) (* (cos th) (sqrt 1/2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th))))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(+ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (* (pow a2 2) (* (cos th) (sqrt 1/2))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 a2 a2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 a2 a2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 a2 a2))))
(* (pow a2 2) (* (cos th) (sqrt 1/2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 a2 a2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 a2 a2))))
(* (pow a2 2) (+ (* (cos th) (sqrt 1/2)) (/ (* (pow a1 2) (* (cos th) (sqrt 1/2))) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (cos.f64 th)) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 (*.f64 a1 (cos.f64 th)))) (*.f64 a2 a2))))
(+ (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 a1 (*.f64 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 a1 (*.f64 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 a1 (*.f64 a1 (cos.f64 th)))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(+ (* (pow a1 2) (cos th)) (* (pow a2 2) (cos th)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (+ (cos th) (/ (* (pow a1 2) (cos th)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (cos.f64 th) (/.f64 (*.f64 a1 (*.f64 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 a1 (*.f64 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 a1 (*.f64 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 a1 (*.f64 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 a1 (*.f64 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 a1 (*.f64 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 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 th (*.f64 th (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))))))))
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(cos th)
(cos.f64 th)
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow 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 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) (+ (/ 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 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) (+ (/ 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 a1 (/.f64 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 (*.f64 a1 a1) (*.f64 a2 (*.f64 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 a1 a1) (*.f64 a2 (*.f64 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 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 (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 a1 a1) (*.f64 a2 (*.f64 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 a1 a1) (*.f64 a2 (*.f64 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 a1 a1) (*.f64 a2 (*.f64 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 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(* (pow a1 2) (+ 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 (/ (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)
(*.f64 a1 a1)
(* (pow a1 2) (+ 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 (/ (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 (/ (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)
(*.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 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+.f64 (*.f64 (/.f64 #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 th th) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.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 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 th th) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(* 1/24 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (+ (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 4) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2)))))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (/.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 th th) (*.f64 th th))) (/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (*.f64 th th))))))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (+ (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 4) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2)))))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (/.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 th th) (*.f64 th th))) (/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (*.f64 th th))))))
(* 1/24 (/ (* (pow th 4) (+ (pow a1 2) (pow a2 2))) (sqrt 2)))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (+ (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 4) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2)))))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (/.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 th th) (*.f64 th th))) (/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (*.f64 th th))))))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (* (pow th 2) (sqrt 2)))) (+ (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (+ (/ (pow a1 2) (* (pow th 4) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2)))))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (/.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 th th) (*.f64 th th))) (/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (*.f64 th th))))))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (sqrt.f64 #s(literal 2 binary64))))))
(/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
(/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a1 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))))
(/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2)))
(+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (sqrt.f64 #s(literal 2 binary64))))))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a1 a1) (*.f64 a2 (*.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))) (* 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)))))
(* 1/24 (* (pow th 4) (+ (pow a1 2) (pow a2 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (pow th 2))) (* 1/24 (+ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (pow th 2))) (+ (* 1/24 (+ (pow a1 2) (pow a2 2))) (+ (/ (pow a1 2) (pow th 4)) (/ (pow a2 2) (pow th 4))))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (/.f64 (*.f64 a1 a1) (*.f64 (*.f64 th th) (*.f64 th th))) (/.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (*.f64 th th))))))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (pow th 2))) (+ (* 1/24 (+ (pow a1 2) (pow a2 2))) (+ (/ (pow a1 2) (pow th 4)) (/ (pow a2 2) (pow th 4))))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (/.f64 (*.f64 a1 a1) (*.f64 (*.f64 th th) (*.f64 th th))) (/.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (*.f64 th th))))))
(* 1/24 (* (pow th 4) (+ (pow a1 2) (pow a2 2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) (*.f64 th th))))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (pow th 2))) (* 1/24 (+ (pow a1 2) (pow a2 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (pow th 2))) (+ (* 1/24 (+ (pow a1 2) (pow a2 2))) (+ (/ (pow a1 2) (pow th 4)) (/ (pow a2 2) (pow th 4))))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (/.f64 (*.f64 a1 a1) (*.f64 (*.f64 th th) (*.f64 th th))) (/.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (*.f64 th th))))))
(* (pow th 4) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (pow th 2))) (+ (* 1/24 (+ (pow a1 2) (pow a2 2))) (+ (/ (pow a1 2) (pow th 4)) (/ (pow a2 2) (pow th 4))))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (+.f64 (/.f64 (*.f64 a1 a1) (*.f64 (*.f64 th th) (*.f64 th th))) (/.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (*.f64 th th))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(+ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(+ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(+ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(* (pow a1 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a1 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(* (pow a1 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a1 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(* (pow a1 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a1 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(* (pow a1 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a1 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(* (pow a1 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a1 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(* (pow a1 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a1 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(+ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(+ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(+ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(* (pow a2 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(* (pow a2 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(* (pow a2 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(* (pow a2 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(* (pow a2 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(* (pow a2 2) (+ 1 (+ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (pow a2 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a1 a1) (*.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 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(+ 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/24 (pow th 4))
(*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow th 4) (- (+ 1/24 (/ 1 (pow th 4))) (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))
(* (pow th 4) (- (+ 1/24 (/ 1 (pow th 4))) (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))
(* 1/24 (pow th 4))
(*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow th 4) (- (+ 1/24 (/ 1 (pow th 4))) (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))
(* (pow th 4) (- (+ 1/24 (/ 1 (pow th 4))) (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))
(*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))
(*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))
(*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(* 1/24 (pow th 4))
(*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* 1/24 (pow th 4))
(*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 #s(literal 1/24 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) (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 (*.f64 a2 (*.f64 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 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 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(pow a2 2)
(*.f64 a2 a2)
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* 1/24 (* (pow a2 2) (pow th 2))))) (pow a2 2))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(+ (* (pow th 2) (+ (* -1/2 (pow 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 a2 (*.f64 a2 #s(literal -1/2 binary64))) (*.f64 (*.f64 th th) (*.f64 (*.f64 a2 a2) (+.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 th (*.f64 th (*.f64 a2 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(+ a2 (* (pow th 2) (+ (* -1/2 a2) (* (pow th 2) (+ (* -1/720 (* a2 (pow th 2))) (* 1/24 a2))))))
(+.f64 a2 (*.f64 (*.f64 th th) (+.f64 (*.f64 a2 #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 (*.f64 th th)) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))))))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(/ (+ (pow 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 th th) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.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 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 th (*.f64 th (+.f64 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (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 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/ (* (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 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.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 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.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 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.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)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.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 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.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 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.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)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (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 (*.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 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.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 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.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 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.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 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.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 (*.f64 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) (- (* (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)))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))

eval256.0ms (2.4%)

Compiler

Compiled 55650 to 2763 computations (95% saved)

prune192.0ms (1.8%)

Pruning

22 alts after pruning (21 fresh and 1 done)

PrunedKeptTotal
New1668201688
Fresh516
Picked415
Done000
Total1677221699
Accuracy
100.0%
Counts
1699 → 22
Alt Table
Click to see full alt table
StatusAccuracyProgram
9.2%
(/.f64 (/.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)))) (sqrt.f64 #s(literal 2 binary64)))
17.1%
(/.f64 (/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
99.3%
(/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
67.2%
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
16.6%
(/.f64 (*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))
60.8%
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
60.4%
(/.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)))
▶59.4%
(/.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))))))))) (sqrt.f64 #s(literal 2 binary64)))
✓99.4%
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
67.0%
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
14.9%
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
▶9.2%
(/.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 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
▶67.2%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
59.9%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
15.0%
(*.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))))))
99.3%
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
67.2%
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
9.1%
(*.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))))
60.7%
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
67.2%
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
▶99.4%
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))
▶14.9%
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
Compiler

Compiled 1054 to 589 computations (44.1% saved)

simplify220.0ms (2%)

Algorithm
1×egg-herbie
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))
✓cost-diff0
(+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
✓cost-diff0
(/.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 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))))
✓cost-diff128
(/.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 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
✓cost-diff0
(+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))))))))
✓cost-diff0
(*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))))))))
✓cost-diff0
(*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))))))))))
✓cost-diff0
(/.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))))))))) (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
✓cost-diff0
(sqrt.f64 #s(literal 2 binary64))
✓cost-diff0
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
✓cost-diff128
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
✓cost-diff0
(sqrt.f64 #s(literal 2 binary64))
✓cost-diff0
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
✓cost-diff0
(*.f64 a2 (cos.f64 th))
✓cost-diff0
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
✓cost-diff0
(sqrt.f64 #s(literal 1/2 binary64))
✓cost-diff0
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))
Rules
3122×*-lowering-*.f32
3122×*-lowering-*.f64
2008×+-lowering-+.f64
2008×+-lowering-+.f32
1098×--lowering--.f32
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
046364
1142309
2376308
31086308
43545308
55656308
08297308
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(* (sqrt 1/2) (* a2 (* a2 (cos th))))
(sqrt 1/2)
1/2
(* a2 (* a2 (cos th)))
a2
(* a2 (cos th))
(cos th)
th
(* a1 (/ a1 (sqrt 2)))
a1
(/ a1 (sqrt 2))
(sqrt 2)
2
(/ 1 (/ (sqrt 2) (+ (* a1 a1) (* a2 a2))))
1
(/ (sqrt 2) (+ (* a1 a1) (* a2 a2)))
(sqrt 2)
2
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
a1
(* a2 a2)
a2
(/ (* a2 (* a2 (+ 1 (* th (* th (+ -1/2 (* th (* th (+ 1/24 (* (* th th) -1/720)))))))))) (sqrt 2))
(* a2 (* a2 (+ 1 (* th (* th (+ -1/2 (* th (* th (+ 1/24 (* (* th th) -1/720))))))))))
a2
(* a2 (+ 1 (* th (* th (+ -1/2 (* th (* th (+ 1/24 (* (* th th) -1/720)))))))))
(+ 1 (* th (* th (+ -1/2 (* th (* th (+ 1/24 (* (* th th) -1/720))))))))
1
(* th (* th (+ -1/2 (* th (* th (+ 1/24 (* (* th th) -1/720)))))))
th
(* th (+ -1/2 (* th (* th (+ 1/24 (* (* th th) -1/720))))))
(+ -1/2 (* th (* th (+ 1/24 (* (* th th) -1/720)))))
-1/2
(* th (* th (+ 1/24 (* (* th th) -1/720))))
(* th (+ 1/24 (* (* th th) -1/720)))
(+ 1/24 (* (* th th) -1/720))
1/24
(* (* th th) -1/720)
(* th th)
-1/720
(sqrt 2)
2
(/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (/ (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))) (sqrt 2))))
1
(/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (/ (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))) (sqrt 2)))
(+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1))))
(* a1 (* a1 (* a1 a1)))
a1
(* a1 (* a1 a1))
(* a1 a1)
(* (* a2 a2) (- (* a2 a2) (* a1 a1)))
(* a2 a2)
a2
(- (* a2 a2) (* a1 a1))
(/ (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))) (sqrt 2))
(+ (* (* 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
(* (sqrt 1/2) (* a2 (* a2 (cos th))))
(*.f64 (cos.f64 th) (*.f64 a2 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2)))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(* a2 (* a2 (cos th)))
(*.f64 (cos.f64 th) (*.f64 a2 a2))
a2
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
(cos th)
(cos.f64 th)
th
(* a1 (/ a1 (sqrt 2)))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
a1
(/ a1 (sqrt 2))
(/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(/ 1 (/ (sqrt 2) (+ (* a1 a1) (* a2 a2))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
1
#s(literal 1 binary64)
(/ (sqrt 2) (+ (* a1 a1) (* a2 a2)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(+ (* a1 a1) (* a2 a2))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(* a1 a1)
(*.f64 a1 a1)
a1
(* a2 a2)
(*.f64 a2 a2)
a2
(/ (* a2 (* a2 (+ 1 (* th (* th (+ -1/2 (* th (* th (+ 1/24 (* (* th th) -1/720)))))))))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.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))))))))) (sqrt.f64 #s(literal 2 binary64)))
(* a2 (* a2 (+ 1 (* th (* th (+ -1/2 (* th (* th (+ 1/24 (* (* th th) -1/720))))))))))
(*.f64 (*.f64 a2 a2) (+.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)))))))))
a2
(* a2 (+ 1 (* th (* th (+ -1/2 (* th (* th (+ 1/24 (* (* th th) -1/720)))))))))
(*.f64 a2 (+.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)))))))))
(+ 1 (* th (* th (+ -1/2 (* th (* th (+ 1/24 (* (* th th) -1/720))))))))
(+.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))))))))
1
#s(literal 1 binary64)
(* th (* th (+ -1/2 (* th (* th (+ 1/24 (* (* th th) -1/720)))))))
(*.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)))))))
th
(* th (+ -1/2 (* th (* th (+ 1/24 (* (* th th) -1/720))))))
(*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))))))
(+ -1/2 (* th (* th (+ 1/24 (* (* th th) -1/720)))))
(+.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))))))
-1/2
#s(literal -1/2 binary64)
(* th (* th (+ 1/24 (* (* th th) -1/720))))
(*.f64 th (*.f64 th (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))))
(* th (+ 1/24 (* (* th th) -1/720)))
(*.f64 th (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))
(+ 1/24 (* (* th th) -1/720))
(+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))
1/24
#s(literal 1/24 binary64)
(* (* th th) -1/720)
(*.f64 (*.f64 th th) #s(literal -1/720 binary64))
(* th th)
(*.f64 th th)
-1/720
#s(literal -1/720 binary64)
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (/ (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))) (sqrt 2))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
1
#s(literal 1 binary64)
(/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (/ (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))) (sqrt 2)))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))))
(+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1))))
(+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(* a1 (* a1 (* a1 a1)))
(*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))
a1
(* a1 (* a1 a1))
(*.f64 a1 (*.f64 a1 a1))
(* a1 a1)
(*.f64 a1 a1)
(* (* a2 a2) (- (* a2 a2) (* a1 a1)))
(*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(* a2 a2)
(*.f64 a2 a2)
a2
(- (* a2 a2) (* a1 a1))
(-.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(/ (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))) (sqrt 2))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2))))
(+.f64 (*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(* (* a1 a1) (* a1 (* a1 (* a1 a1))))
(*.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1)))
(* (* a2 (* a2 a2)) (* a2 (* a2 a2)))
(*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 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)

localize313.0ms (2.9%)

Localize:

Found 19 expressions of interest:

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

Compiled 494 to 47 computations (90.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 72.0ms
ival-mult: 33.0ms (46% of total)
ival-div: 11.0ms (15.3% of total)
ival-add: 7.0ms (9.8% of total)
ival-cos: 7.0ms (9.8% of total)
...c/correct-round.rkt:119:19: 7.0ms (9.8% of total)
ival-sqrt: 4.0ms (5.6% of total)
ival-sub: 1.0ms (1.4% of total)
const: 1.0ms (1.4% of total)
backward-pass: 0.0ms (0% of total)

series40.0ms (0.4%)

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

108 calls:

TimeVariablePointExpression
9.0ms
a1
@0
(/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (/ (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))) (sqrt 2))))
4.0ms
th
@inf
(* (sqrt 1/2) (* a2 (* a2 (cos th))))
2.0ms
a2
@0
(/ (* a2 (* a2 (+ 1 (* th (* th (+ -1/2 (* th (* th (+ 1/24 (* (* th th) -1/720)))))))))) (sqrt 2))
1.0ms
a2
@0
(/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (/ (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))) (sqrt 2))))
1.0ms
a1
@inf
(/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (/ (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))) (sqrt 2)))

rewrite753.0ms (7%)

Algorithm
1×batch-egg-rewrite
Rules
3774×*-lowering-*.f32
3774×*-lowering-*.f64
3170×/-lowering-/.f32
3170×/-lowering-/.f64
1794×fma-lowering-fma.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
046191
1279172
22306172
09197172
Stop Event
1×iter limit
1×node limit
Counts
24 → 944
Calls
Call 1
Inputs
(* (sqrt 1/2) (* a2 (* a2 (cos th))))
(sqrt 1/2)
(* a2 (* a2 (cos th)))
(* a2 (cos th))
(* a1 (/ a1 (sqrt 2)))
(/ a1 (sqrt 2))
(sqrt 2)
(/ 1 (/ (sqrt 2) (+ (* a1 a1) (* a2 a2))))
(/ (sqrt 2) (+ (* a1 a1) (* a2 a2)))
(+ (* a1 a1) (* a2 a2))
(/ (* a2 (* a2 (+ 1 (* th (* th (+ -1/2 (* th (* th (+ 1/24 (* (* th th) -1/720)))))))))) (sqrt 2))
(* a2 (* a2 (+ 1 (* th (* th (+ -1/2 (* th (* th (+ 1/24 (* (* th th) -1/720))))))))))
(* a2 (+ 1 (* th (* th (+ -1/2 (* th (* th (+ 1/24 (* (* th th) -1/720)))))))))
(+ 1 (* th (* th (+ -1/2 (* th (* th (+ 1/24 (* (* th th) -1/720))))))))
(/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (/ (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))) (sqrt 2))))
(/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (/ (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))) (sqrt 2)))
(+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1))))
(* a1 (* a1 (* a1 a1)))
(cos th)
(* a1 a1)
(* (* th th) -1/720)
(* th (+ 1/24 (* (* th th) -1/720)))
(- (* a2 a2) (* a1 a1))
(* (* a2 a2) (- (* a2 a2) (* a1 a1)))
Outputs
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(*.f64 a2 (*.f64 (*.f64 a2 (cos.f64 th)) (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (*.f64 a2 (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2))
(*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (*.f64 a2 a2) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) (*.f64 a2 (cos.f64 th)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 (cos.f64 th))) a2)
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2)) (cos.f64 th))
(*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) a2) (cos.f64 th))
(*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2) (cos.f64 th)) a2)
(exp.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 1/2 binary64))
(pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(*.f64 (cos.f64 th) (*.f64 a2 a2))
(*.f64 (*.f64 a2 (cos.f64 th)) a2)
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(*.f64 a2 (cos.f64 th))
(*.f64 (cos.f64 th) a2)
(exp.f64 (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 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)))))
(/.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 (-.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) a1) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(/.f64 (*.f64 a1 #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.f64 (*.f64 #s(literal 1 binary64) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.f64 (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 (*.f64 a1 #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) a1)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(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 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a1)))
(*.f64 #s(literal 1 binary64) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(*.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 a1 (/.f64 #s(literal 1 binary64) a1)))
(*.f64 (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 a1 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) a1) #s(literal -1 binary64)) (/.f64 a1 (sqrt.f64 #s(literal 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 (-.f64 #s(literal 0 binary64) a1) (-.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)) a1)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1) #s(literal 1 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)))
(*.f64 (/.f64 a1 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(+.f64 (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(+.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 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(-.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 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.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 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.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 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.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 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.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 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.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)))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(fma.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))))
(fma.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(fma.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)))
(fma.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)))
(neg.f64 (/.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 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 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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(/.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))
(/.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))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(/.f64 #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 0 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))))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(/.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 #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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (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 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(/.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 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.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 (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 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 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 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 (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 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 #s(literal 0 binary64) (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 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (+.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 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) #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 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (-.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) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (neg.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))))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 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 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(/.f64 (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 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.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 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) #s(literal 1 binary64))) (neg.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))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (-.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) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.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)))))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (pow.f64 (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (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 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 a1)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 a1))) (-.f64 (*.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 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 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.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 a2 a2))) (-.f64 (*.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 a1 a1))) (*.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 (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (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 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (*.f64 (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #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 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/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 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.f64 #s(literal -1 binary64) (/.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)) (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 (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 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 #s(literal 1 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 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (+.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/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (/.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (pow.f64 (/.f64 #s(literal -1 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))))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(*.f64 (*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (pow.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.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))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.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))))) (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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (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 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 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))))) (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 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.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 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.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))))) (-.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 a2 (*.f64 (*.f64 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 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.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 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.f64 (/.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))))) (-.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 #s(literal 1 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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.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))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(*.f64 (/.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(*.f64 (/.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(*.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))))) #s(literal -1 binary64)) (/.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.f64 (/.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)))))) #s(literal -1 binary64)) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.f64 (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.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 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 #s(literal 1 binary64) (+.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/2 binary64)))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (sqrt.f64 #s(literal 2 binary64))) (/.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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 #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 (*.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (-.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 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.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 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (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 (*.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (/.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 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (/.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 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 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.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 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 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 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (/.f64 (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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.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 (/.f64 (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) #s(literal 1 binary64)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (/.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 (/.f64 (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.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 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (/.f64 (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.f64 (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 (*.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) #s(literal 1 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))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.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 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 (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 (*.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 a2 a1)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)))
(exp.f64 (*.f64 (log.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (neg.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 (sqrt.f64 #s(literal 2 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (/.f64 (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (/.f64 (+.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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 (*.f64 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 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (+.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 (/.f64 #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 2 binary64)))))))
(-.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (*.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #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) (neg.f64 (neg.f64 (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (/.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 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.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) (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 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (*.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (*.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.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 (*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (neg.f64 (*.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (neg.f64 (*.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) #s(literal 1 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))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.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 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.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 (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (neg.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) #s(literal 1 binary64))) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.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)))))))) (neg.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.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)))))))) (neg.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)))
(*.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (/.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 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (/.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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(literal -1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 #s(literal -1 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))))) (sqrt.f64 #s(literal 2 binary64)))))
(*.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)))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))
(*.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)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) #s(literal -1 binary64)))
(*.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)))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) #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 (/.f64 #s(literal 1 binary64) (+.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 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) #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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 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 #s(literal 1 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 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.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) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.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 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) #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 (pow.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 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (pow.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (+.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)) (pow.f64 (pow.f64 #s(literal 2 binary64) #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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) #s(literal -1 binary64)) (/.f64 #s(literal -1 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))))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (pow.f64 (*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (pow.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (-.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 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (-.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 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 a1 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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 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 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) #s(literal 1 binary64)) (/.f64 (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.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 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.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 (/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.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 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (/.f64 (-.f64 (*.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/2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 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 (*.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 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.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 (*.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 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.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 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (-.f64 #s(literal 0 binary64) (+.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))
(/.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 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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))))
(/.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 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(/.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (neg.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.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 (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)))))
(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 (/.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 (*.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (pow.f64 (/.f64 #s(literal 1 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 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (/.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.f64 (pow.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (pow.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.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 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.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 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(*.f64 (/.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))))) (-.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 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 (*.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 a2) (*.f64 a2 (*.f64 a2 (*.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 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 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 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 a2 a1)) (+.f64 a2 a1))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 a2 a1)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 a1 a2)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (/.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.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 a2 a1)) (-.f64 a2 a1))
(*.f64 (/.f64 (+.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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.f64 (/.f64 (+.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 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))))
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64)))))))))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))))))))
(/.f64 (*.f64 a2 (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64)))))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))))) #s(literal 1 binary64))))
(/.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (+.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 th (*.f64 th #s(literal -1/720 binary64)))))))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))))))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 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)) a2) (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a2 (*.f64 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 a2) (*.f64 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (*.f64 a2 a2) (/.f64 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64)))))))))) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64)))))))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (+.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 th (*.f64 th #s(literal -1/720 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/2 binary64)) (*.f64 a2 (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64)))))))))))) #s(literal -1 binary64)))
(*.f64 (*.f64 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2)
(*.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64)))))))))) (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 (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))))) (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 #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 th (*.f64 th #s(literal -1/720 binary64))))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 a2 #s(literal -1 binary64)) (/.f64 (neg.f64 (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (neg.f64 (+.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 th (*.f64 th #s(literal -1/720 binary64)))))))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64)))))))))) #s(literal -1 binary64)) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (neg.f64 (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (neg.f64 a2) #s(literal -1 binary64)) (*.f64 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (neg.f64 (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))))) #s(literal -1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2))))
(+.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))))
(+.f64 (*.f64 a2 a2) (*.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)) a2))
(+.f64 (*.f64 a2 a2) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 a2 a2)))
(+.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))) (*.f64 a2 a2))
(+.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 a2 a2)) (*.f64 a2 a2))
(fma.f64 a2 a2 (*.f64 a2 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2))))
(fma.f64 a2 a2 (*.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)) a2))
(fma.f64 #s(literal 1 binary64) (*.f64 a2 a2) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 a2 a2)))
(fma.f64 (*.f64 a2 a2) #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))))
(fma.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 a2 a2))
(fma.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 a2 a2) (*.f64 a2 a2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))))) (-.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 th (*.f64 th #s(literal -1/720 binary64))))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))))))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))))))) (neg.f64 (-.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 th (*.f64 th #s(literal -1/720 binary64)))))))))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (pow.f64 (*.f64 a2 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2))) #s(literal 3 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2))) (*.f64 a2 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)))))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (pow.f64 (*.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)) a2) #s(literal 3 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)) a2) (*.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)) a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)) a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (pow.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))) #s(literal 3 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))) #s(literal 3 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (pow.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 a2 a2)) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 a2 a2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 a2 a2)) #s(literal 3 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 a2 a2)) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 a2 a2))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 a2 a2)) (*.f64 a2 a2)))))
(*.f64 a2 (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64)))))))))))
(*.f64 (*.f64 a2 a2) (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))))
(*.f64 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))) (*.f64 a2 a2))
(*.f64 (*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64)))))))))) a2)
(+.f64 a2 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)))
(+.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)) a2)
(-.f64 (/.f64 (*.f64 a2 a2) (-.f64 a2 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)))) (/.f64 (*.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2))) (-.f64 a2 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)))))
(fma.f64 a2 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)))
(fma.f64 a2 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) a2)
(fma.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2) a2)
(fma.f64 #s(literal 1 binary64) a2 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)))
(fma.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))) a2) a2)
(fma.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) (*.f64 th a2) a2)
(fma.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) a2 a2)
(fma.f64 (*.f64 a2 th) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)
(fma.f64 (*.f64 a2 (*.f64 th th)) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))) a2)
(fma.f64 (*.f64 a2 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) th a2)
(/.f64 (+.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))))))) (+.f64 (*.f64 a2 a2) (-.f64 (*.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2))) (*.f64 a2 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2))))))
(/.f64 (-.f64 (*.f64 a2 a2) (*.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)))) (-.f64 a2 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2))))
(/.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) #s(literal 1 binary64)))))
(/.f64 (*.f64 a2 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))))) (-.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 th (*.f64 th #s(literal -1/720 binary64))))))))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))))) a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))))) a2) (-.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 th (*.f64 th #s(literal -1/720 binary64))))))))))
(/.f64 (neg.f64 (+.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))))))) (neg.f64 (+.f64 (*.f64 a2 a2) (-.f64 (*.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2))) (*.f64 a2 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 a2 a2) (*.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2))))) (neg.f64 (-.f64 a2 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)))))
(/.f64 (neg.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))))))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 a2 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))))))) (neg.f64 (-.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 th (*.f64 th #s(literal -1/720 binary64)))))))))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))))) a2)) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))))) a2)) (neg.f64 (-.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 th (*.f64 th #s(literal -1/720 binary64)))))))))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))))) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2))) (-.f64 (*.f64 a2 a2) (*.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) a2)) a2))))
(*.f64 a2 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))))
(*.f64 (+.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 th (*.f64 th #s(literal -1/720 binary64))))))))) a2)
(+.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 th (*.f64 th #s(literal -1/720 binary64)))))))))
(+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) #s(literal 1 binary64))
(-.f64 (/.f64 #s(literal 1 binary64) (-.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 th (*.f64 th #s(literal -1/720 binary64)))))))))) (/.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))) (-.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 th (*.f64 th #s(literal -1/720 binary64)))))))))))
(-.f64 (/.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) #s(literal 1 binary64))))
(fma.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) #s(literal 1 binary64))
(fma.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 th (*.f64 th #s(literal -1/720 binary64)))))))) #s(literal 1 binary64))
(fma.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))) #s(literal 1 binary64))
(fma.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))) (*.f64 th th) #s(literal 1 binary64))
(fma.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) th #s(literal 1 binary64))
(fma.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 1 binary64) th) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 th th)) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) th #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) #s(literal 1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.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 th (*.f64 th #s(literal -1/720 binary64))))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) #s(literal 1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.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 th (*.f64 th #s(literal -1/720 binary64))))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))))))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) #s(literal 1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))))) (+.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))) (-.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 th (*.f64 th #s(literal -1/720 binary64)))))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))))) (-.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 th (*.f64 th #s(literal -1/720 binary64))))))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))))))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))))))) (neg.f64 (+.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))) (-.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 th (*.f64 th #s(literal -1/720 binary64))))))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))))) (neg.f64 (-.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 th (*.f64 th #s(literal -1/720 binary64)))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))) #s(literal 1 binary64)) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (-.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 th (*.f64 th #s(literal -1/720 binary64)))))))))) (*.f64 (-.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 th (*.f64 th #s(literal -1/720 binary64))))))))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))))) (*.f64 (-.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 th (*.f64 th #s(literal -1/720 binary64))))))))) (-.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 th (*.f64 th #s(literal -1/720 binary64)))))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))))))) (neg.f64 (neg.f64 (-.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 th (*.f64 th #s(literal -1/720 binary64))))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))) #s(literal 1 binary64))) (neg.f64 (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) #s(literal 1 binary64))))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) #s(literal 1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.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 th (*.f64 th #s(literal -1/720 binary64))))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))))) #s(literal -1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) #s(literal 1 binary64))))))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))))) (/.f64 #s(literal 1 binary64) (-.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 th (*.f64 th #s(literal -1/720 binary64)))))))))))
(+.f64 (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(+.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 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) 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 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(-.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 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.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 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.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 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.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 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.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 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.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)))))
(fma.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(fma.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1 (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(fma.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))))
(fma.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(fma.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)))
(fma.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)))
(neg.f64 (/.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 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 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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(/.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))
(/.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))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(/.f64 #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 0 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))))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(/.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 #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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (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 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(/.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 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.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 (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 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 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 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 (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 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 #s(literal 0 binary64) (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 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (+.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 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) #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 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (-.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) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (neg.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))))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 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 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(/.f64 (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 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.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 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) #s(literal 1 binary64))) (neg.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))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (-.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) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.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)))))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (pow.f64 (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (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 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 a1)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 a1))) (-.f64 (*.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 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 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.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 a2 a2))) (-.f64 (*.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 a1 a1))) (*.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 (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (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 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))) (*.f64 (*.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #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 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/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 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.f64 #s(literal -1 binary64) (/.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)) (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 (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 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 #s(literal 1 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 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (+.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/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (/.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (pow.f64 (/.f64 #s(literal -1 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))))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(*.f64 (*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (pow.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.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))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.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))))) (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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (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 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 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))))) (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 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.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 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.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))))) (-.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 a2 (*.f64 (*.f64 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 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.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 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.f64 (/.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))))) (-.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 #s(literal 1 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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.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))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(*.f64 (/.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(*.f64 (/.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(*.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))))) #s(literal -1 binary64)) (/.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.f64 (/.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)))))) #s(literal -1 binary64)) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.f64 (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.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 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.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 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 #s(literal 1 binary64) (+.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/2 binary64)))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (sqrt.f64 #s(literal 2 binary64))) (/.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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 #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 (*.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (-.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 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.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 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (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 (*.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (/.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 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (/.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 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 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.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 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 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 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (/.f64 (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 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.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 (/.f64 (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) #s(literal 1 binary64)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (/.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 (/.f64 (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.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 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (/.f64 (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.f64 (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 (*.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) #s(literal 1 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))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.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 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 (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 (*.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 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) #s(literal -1 binary64)) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 a2 a1)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)))
(exp.f64 (*.f64 (log.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (neg.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 (sqrt.f64 #s(literal 2 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (/.f64 (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (/.f64 (+.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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 (*.f64 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 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (+.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 (/.f64 #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 2 binary64)))))))
(-.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (*.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #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) (neg.f64 (neg.f64 (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (/.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 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.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) (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 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (*.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (*.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.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 (*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (neg.f64 (*.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (neg.f64 (*.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) #s(literal 1 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))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.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 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.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 (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (neg.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) #s(literal 1 binary64))) (-.f64 #s(literal 0 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))))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.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)))))))) (neg.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.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)))))))) (neg.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)))
(*.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (/.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 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (/.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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(literal -1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 #s(literal -1 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))))) (sqrt.f64 #s(literal 2 binary64)))))
(*.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)))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))
(*.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)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) #s(literal -1 binary64)))
(*.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)))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) #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 (/.f64 #s(literal 1 binary64) (+.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 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) #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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 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 #s(literal 1 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 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.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) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.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 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) #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 (pow.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 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (pow.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (+.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)) (pow.f64 (pow.f64 #s(literal 2 binary64) #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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) #s(literal -1 binary64)) (/.f64 #s(literal -1 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))))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (pow.f64 (*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (pow.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (-.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 1 binary64) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (-.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 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 a1 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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 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 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) #s(literal 1 binary64)) (/.f64 (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.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 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.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 (/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.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 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (/.f64 (-.f64 (*.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/2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))
(+.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))
(-.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(-.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))
(-.f64 (/.f64 (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))
(fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))
(fma.f64 (*.f64 a1 a1) (*.f64 a1 a1) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))
(fma.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))
(fma.f64 (*.f64 a1 (*.f64 a1 a1)) a1 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))
(fma.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))
(fma.f64 (+.f64 a2 a1) (*.f64 (-.f64 a2 a1) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))
(fma.f64 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) a2 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))
(fma.f64 (*.f64 (*.f64 a2 a2) (+.f64 a2 a1)) (-.f64 a2 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))
(/.f64 #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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(/.f64 #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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (+.f64 (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (neg.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (neg.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (neg.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) (neg.f64 (neg.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (neg.f64 (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (-.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(*.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))))
(exp.f64 (*.f64 #s(literal 4 binary64) (log.f64 a1)))
(exp.f64 (*.f64 (log.f64 a1) #s(literal 4 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 a1)) #s(literal 2 binary64)))
(pow.f64 a1 #s(literal 4 binary64))
(pow.f64 (*.f64 a1 a1) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) #s(literal 2 binary64))
(*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))
(*.f64 (*.f64 a1 a1) (*.f64 a1 a1))
(*.f64 (*.f64 a1 (*.f64 a1 a1)) a1)
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))
(cos.f64 th)
(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)))
(*.f64 th (*.f64 th #s(literal -1/720 binary64)))
(*.f64 (*.f64 th th) #s(literal -1/720 binary64))
(*.f64 #s(literal -1/720 binary64) (*.f64 th th))
(*.f64 (*.f64 th #s(literal -1/720 binary64)) th)
(+.f64 (*.f64 th #s(literal 1/24 binary64)) (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))
(+.f64 (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64)))) (*.f64 th #s(literal 1/24 binary64)))
(-.f64 (/.f64 (*.f64 (*.f64 th #s(literal 1/24 binary64)) (*.f64 th #s(literal 1/24 binary64))) (-.f64 (*.f64 th #s(literal 1/24 binary64)) (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))) (/.f64 (*.f64 (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64)))) (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64))))) (-.f64 (*.f64 th #s(literal 1/24 binary64)) (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))
(fma.f64 th #s(literal 1/24 binary64) (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))
(fma.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64))) (*.f64 th #s(literal 1/24 binary64)))
(fma.f64 #s(literal 1/24 binary64) th (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))
(fma.f64 (*.f64 th th) (*.f64 th #s(literal -1/720 binary64)) (*.f64 th #s(literal 1/24 binary64)))
(fma.f64 #s(literal -1/720 binary64) (*.f64 th (*.f64 th th)) (*.f64 th #s(literal 1/24 binary64)))
(fma.f64 (*.f64 th (*.f64 th #s(literal -1/720 binary64))) th (*.f64 th #s(literal 1/24 binary64)))
(fma.f64 (*.f64 th #s(literal -1/720 binary64)) (*.f64 th th) (*.f64 th #s(literal 1/24 binary64)))
(fma.f64 (*.f64 th (*.f64 th th)) #s(literal -1/720 binary64) (*.f64 th #s(literal 1/24 binary64)))
(/.f64 (+.f64 (*.f64 #s(literal 1/13824 binary64) (*.f64 th (*.f64 th th))) (*.f64 (*.f64 (*.f64 th (*.f64 th th)) #s(literal -1/373248000 binary64)) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 th (*.f64 th th))))) (+.f64 (*.f64 (*.f64 th #s(literal 1/24 binary64)) (*.f64 th #s(literal 1/24 binary64))) (-.f64 (*.f64 (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64)))) (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64))))) (*.f64 (*.f64 th #s(literal 1/24 binary64)) (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 th #s(literal 1/24 binary64)) (*.f64 th #s(literal 1/24 binary64))) (*.f64 (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64)))) (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))) (-.f64 (*.f64 th #s(literal 1/24 binary64)) (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))
(/.f64 (*.f64 th (+.f64 #s(literal 1/13824 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th th)) #s(literal -1/373248000 binary64))))) (+.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/720 binary64))) (-.f64 (*.f64 th (*.f64 th #s(literal -1/720 binary64))) #s(literal 1/24 binary64)))))
(/.f64 (*.f64 th (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal 1/518400 binary64)))) (-.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))
(/.f64 (*.f64 (+.f64 #s(literal 1/13824 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th th)) #s(literal -1/373248000 binary64)))) th) (+.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/720 binary64))) (-.f64 (*.f64 th (*.f64 th #s(literal -1/720 binary64))) #s(literal 1/24 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal 1/518400 binary64))) th) (-.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))
(/.f64 (neg.f64 (+.f64 (*.f64 #s(literal 1/13824 binary64) (*.f64 th (*.f64 th th))) (*.f64 (*.f64 (*.f64 th (*.f64 th th)) #s(literal -1/373248000 binary64)) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 th (*.f64 th th)))))) (neg.f64 (+.f64 (*.f64 (*.f64 th #s(literal 1/24 binary64)) (*.f64 th #s(literal 1/24 binary64))) (-.f64 (*.f64 (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64)))) (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64))))) (*.f64 (*.f64 th #s(literal 1/24 binary64)) (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 th #s(literal 1/24 binary64)) (*.f64 th #s(literal 1/24 binary64))) (*.f64 (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64)))) (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))) (neg.f64 (-.f64 (*.f64 th #s(literal 1/24 binary64)) (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))))
(/.f64 (neg.f64 (*.f64 th (+.f64 #s(literal 1/13824 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th th)) #s(literal -1/373248000 binary64)))))) (neg.f64 (+.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/720 binary64))) (-.f64 (*.f64 th (*.f64 th #s(literal -1/720 binary64))) #s(literal 1/24 binary64))))))
(/.f64 (neg.f64 (*.f64 th (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal 1/518400 binary64))))) (neg.f64 (-.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/13824 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th th)) #s(literal -1/373248000 binary64)))) th)) (neg.f64 (+.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/720 binary64))) (-.f64 (*.f64 th (*.f64 th #s(literal -1/720 binary64))) #s(literal 1/24 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/576 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal 1/518400 binary64))) th)) (neg.f64 (-.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 th (*.f64 th th)) #s(literal -1/373248000 binary64)) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 th (*.f64 th th)))) (*.f64 #s(literal 1/13824 binary64) (*.f64 th (*.f64 th th)))) (+.f64 (*.f64 (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64)))) (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64))))) (-.f64 (*.f64 (*.f64 th #s(literal 1/24 binary64)) (*.f64 th #s(literal 1/24 binary64))) (*.f64 (*.f64 th (*.f64 th (*.f64 th #s(literal -1/720 binary64)))) (*.f64 th #s(literal 1/24 binary64))))))
(*.f64 th (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))))
(*.f64 (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 binary64)))) th)
(+.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))
(+.f64 (*.f64 a2 a2) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))
(+.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))
(+.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2))
(+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(-.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(-.f64 (*.f64 a2 a2) (-.f64 (*.f64 a1 a1) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))
(-.f64 (/.f64 (*.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 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 a2 (*.f64 a2 (*.f64 a2 a2))) (+.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 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))))
(-.f64 (/.f64 (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))) (/.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))) (-.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))))
(fma.f64 a2 a2 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))
(fma.f64 a2 a2 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))
(fma.f64 a2 a2 (neg.f64 (-.f64 (*.f64 a1 a1) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))))
(fma.f64 a1 (-.f64 #s(literal 0 binary64) a1) (*.f64 a2 a2))
(fma.f64 (-.f64 #s(literal 0 binary64) a1) a1 (*.f64 a2 a2))
(fma.f64 #s(literal -1 binary64) (*.f64 a1 a1) (*.f64 a2 a2))
(fma.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (/.f64 #s(literal 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 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))
(fma.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (/.f64 #s(literal 1 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 a1 a1)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))
(fma.f64 (+.f64 a2 a1) (-.f64 a2 a1) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))
(fma.f64 (+.f64 a2 a1) (-.f64 a2 a1) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))
(fma.f64 (-.f64 a2 a1) (+.f64 a2 a1) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))
(fma.f64 (-.f64 a2 a1) (+.f64 a2 a1) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))
(fma.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))
(fma.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))
(fma.f64 (/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))
(fma.f64 (/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))
(fma.f64 (/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))
(fma.f64 (/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))
(/.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 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))))
(/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (+.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 #s(literal 0 binary64) (*.f64 a1 a1))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (neg.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (neg.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (-.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 #s(literal 0 binary64) (*.f64 a1 a1)))))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))) (+.f64 (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))))
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))) (-.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (*.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 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (neg.f64 (neg.f64 (+.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 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))))) (neg.f64 (+.f64 (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))) (neg.f64 (-.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (pow.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))) #s(literal 3 binary64))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))))))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (pow.f64 (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))))))
(/.f64 (+.f64 (neg.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 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))) (-.f64 (*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(pow.f64 (/.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) #s(literal -1 binary64))
(*.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (+.f64 a2 a1) (-.f64 a2 a1))
(*.f64 (-.f64 a2 a1) (+.f64 a2 a1))
(*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (+.f64 (*.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 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))
(*.f64 (/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (/.f64 (+.f64 (*.f64 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 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 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 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(+.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1)))))
(+.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))
(+.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (*.f64 a2 a2)))
(+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (neg.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1)))))
(+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))))) (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))))))
(-.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))) (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))))
(fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (neg.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1)))))
(fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(fma.f64 a2 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1)))))
(fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 (*.f64 a2 a2) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))
(fma.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (*.f64 a2 a2)))
(fma.f64 (*.f64 a2 a2) (*.f64 a2 a2) (neg.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1)))))
(fma.f64 (*.f64 a2 a2) (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(fma.f64 (*.f64 a2 a2) (*.f64 a2 a2) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(fma.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1)))))
(fma.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))
(fma.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (*.f64 a2 a2)))
(fma.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 a2 a2) (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1)))))
(fma.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))
(fma.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 a2 a2) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (*.f64 a2 a2)))
(fma.f64 (*.f64 a2 (*.f64 a2 a2)) a2 (neg.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1)))))
(fma.f64 (*.f64 a2 (*.f64 a2 a2)) a2 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(fma.f64 (*.f64 a2 (*.f64 a2 a2)) a2 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)))
(fma.f64 (+.f64 a2 a1) (*.f64 (-.f64 a2 a1) (*.f64 a2 a2)) (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1)))))
(fma.f64 (+.f64 a2 a1) (*.f64 (-.f64 a2 a1) (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))
(fma.f64 (+.f64 a2 a1) (*.f64 (-.f64 a2 a1) (*.f64 a2 a2)) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (*.f64 a2 a2)))
(fma.f64 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) a2 (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1)))))
(fma.f64 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) a2 (*.f64 (*.f64 a2 a2) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))
(fma.f64 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) a2 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (*.f64 a2 a2)))
(fma.f64 (*.f64 (*.f64 a2 a2) (+.f64 a2 a1)) (-.f64 a2 a1) (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1)))))
(fma.f64 (*.f64 (*.f64 a2 a2) (+.f64 a2 a1)) (-.f64 a2 a1) (*.f64 (*.f64 a2 a2) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))))
(fma.f64 (*.f64 (*.f64 a2 a2) (+.f64 a2 a1)) (-.f64 a2 a1) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (*.f64 a2 a2)))
(/.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1)))))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a1 a1)))))
(/.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 a2)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (neg.f64 (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 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 a2 (*.f64 a2 (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))))) (neg.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 a2))) (neg.f64 (+.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 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (pow.f64 (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 (*.f64 (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1)))) (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (pow.f64 (*.f64 (*.f64 a2 a2) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 a2) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)))))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (pow.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (-.f64 (*.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (*.f64 a2 a2)) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a1 a1)) (*.f64 a2 a2))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (pow.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 (neg.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1)))) (neg.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (neg.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (pow.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2))))))
(*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))
(*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.f64 a2 a2))
(*.f64 (+.f64 a2 a1) (*.f64 (-.f64 a2 a1) (*.f64 a2 a2)))
(*.f64 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)) a2)
(*.f64 (*.f64 (*.f64 a2 a2) (+.f64 a2 a1)) (-.f64 a2 a1))
(*.f64 (/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.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 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))
(*.f64 (/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (*.f64 a2 a2) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (*.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 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))))

simplify310.0ms (2.9%)

Algorithm
1×egg-herbie
Rules
4128×*-lowering-*.f32
4128×*-lowering-*.f64
2552×+-lowering-+.f64
2552×+-lowering-+.f32
1070×sum3-define
Iterations

Useful iterations: 2 (0.0ms)

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

eval197.0ms (1.8%)

Compiler

Compiled 68447 to 3287 computations (95.2% saved)

prune169.0ms (1.6%)

Pruning

37 alts after pruning (34 fresh and 3 done)

PrunedKeptTotal
New1468231491
Fresh51116
Picked325
Done011
Total1476371513
Accuracy
100.0%
Counts
1513 → 37
Alt Table
Click to see full alt table
StatusAccuracyProgram
17.1%
(/.f64 (/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
67.2%
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
9.1%
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (+.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)))
▶60.8%
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
60.4%
(/.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.4%
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
67.0%
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
14.9%
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
14.9%
(/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
10.9%
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 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)))) (sqrt.f64 #s(literal 2 binary64)))))
▶1.1%
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.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)))) (sqrt.f64 #s(literal 2 binary64)))))
9.1%
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.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 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 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
9.2%
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 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)))) (sqrt.f64 #s(literal 2 binary64)))))
0.5%
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 (*.f64 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)))))
8.7%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (/.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))))
15.1%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (/.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
62.9%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 a2 a1)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 a1 a2)))))
67.0%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
49.5%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))))
14.9%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
67.2%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
16.7%
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
9.1%
(/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 #s(literal -1 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))))) (sqrt.f64 #s(literal 2 binary64))))))
6.0%
(*.f64 (/.f64 (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
15.0%
(*.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))))))
▶99.3%
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
14.9%
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a1)))
67.2%
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
9.1%
(*.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))))
60.7%
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
▶67.2%
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
59.4%
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 (*.f64 a2 (+.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)))))))))))
✓99.4%
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))
67.0%
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2))
▶67.0%
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
✓14.9%
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
14.9%
(*.f64 a1 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
Compiler

Compiled 2155 to 1077 computations (50% saved)

simplify180.0ms (1.7%)

Algorithm
1×egg-herbie
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))
✓cost-diff0
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.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)))) (sqrt.f64 #s(literal 2 binary64))))
✓cost-diff128
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.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)))) (sqrt.f64 #s(literal 2 binary64)))))
✓cost-diff384
(+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
✓cost-diff0
(*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
✓cost-diff0
(+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
✓cost-diff0
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 a2 a2))
✓cost-diff0
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(*.f64 a1 a1)
✓cost-diff0
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
✓cost-diff0
(sqrt.f64 #s(literal 1/2 binary64))
✓cost-diff0
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
✓cost-diff0
(sqrt.f64 #s(literal 1/2 binary64))
✓cost-diff0
(*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))
✓cost-diff0
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
✓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))
Rules
3366×*-lowering-*.f32
3366×*-lowering-*.f64
1624×/-lowering-/.f32
1624×/-lowering-/.f64
1436×fma-lowering-fma.f32
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
040273
1118231
2282227
3583226
41437226
53165226
66385226
08061226
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(* (/ (cos th) (sqrt 2)) (* a2 a2))
(/ (cos th) (sqrt 2))
(cos th)
th
(sqrt 2)
2
(* a2 a2)
a2
(* a2 (* a2 (sqrt 1/2)))
a2
(* a2 (sqrt 1/2))
(sqrt 1/2)
1/2
(* (sqrt 1/2) (+ (* a1 a1) (* a2 a2)))
(sqrt 1/2)
1/2
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
a1
(* a2 a2)
a2
(/ (* (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24))))) (* a2 a2)) (sqrt 2))
(* (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24))))) (* a2 a2))
(+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24)))))
1
(* th (* th (+ -1/2 (* (* th th) 1/24))))
th
(* th (+ -1/2 (* (* th th) 1/24)))
(+ -1/2 (* (* th th) 1/24))
-1/2
(* (* th th) 1/24)
(* th th)
1/24
(* a2 a2)
a2
(sqrt 2)
2
(/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- 0 (* a1 a1)))) (/ (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))) (sqrt 2))))
1
(/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- 0 (* a1 a1)))) (/ (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))) (sqrt 2)))
(+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- 0 (* a1 a1))))
(* a1 (* a1 (* a1 a1)))
a1
(* a1 (* a1 a1))
(* a1 a1)
(* (* a2 a2) (- 0 (* a1 a1)))
(* a2 a2)
a2
(- 0 (* a1 a1))
0
(/ (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))) (sqrt 2))
(+ (* (* 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
(* (/ (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
(* a2 (* a2 (sqrt 1/2)))
(*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 1/2 binary64)))
a2
(* a2 (sqrt 1/2))
(*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(* (sqrt 1/2) (+ (* a1 a1) (* a2 a2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(+ (* a1 a1) (* a2 a2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(* a1 a1)
(*.f64 a1 a1)
a1
(* a2 a2)
(*.f64 a2 a2)
a2
(/ (* (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24))))) (* a2 a2)) (sqrt 2))
(*.f64 a2 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(* (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24))))) (* a2 a2))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24)))))
(+.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
#s(literal 1 binary64)
(* th (* th (+ -1/2 (* (* th th) 1/24))))
(*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
th
(* th (+ -1/2 (* (* th th) 1/24)))
(*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))
(+ -1/2 (* (* th th) 1/24))
(+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))
-1/2
#s(literal -1/2 binary64)
(* (* th th) 1/24)
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* th th)
(*.f64 th th)
1/24
#s(literal 1/24 binary64)
(* a2 a2)
(*.f64 a2 a2)
a2
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- 0 (* a1 a1)))) (/ (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))) (sqrt 2))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 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 a1 (*.f64 a1 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
1
#s(literal 1 binary64)
(/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- 0 (* a1 a1)))) (/ (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))) (sqrt 2)))
(/.f64 (*.f64 a1 (*.f64 a1 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (+.f64 (*.f64 a1 (*.f64 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))))
(+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- 0 (* a1 a1))))
(*.f64 a1 (*.f64 a1 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(* a1 (* a1 (* a1 a1)))
(*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))
a1
(* a1 (* a1 a1))
(*.f64 a1 (*.f64 a1 a1))
(* a1 a1)
(*.f64 a1 a1)
(* (* a2 a2) (- 0 (* a1 a1)))
(*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(* a2 a2)
(*.f64 a2 a2)
a2
(- 0 (* a1 a1))
(-.f64 #s(literal 0 binary64) (*.f64 a1 a1))
0
#s(literal 0 binary64)
(/ (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))) (sqrt 2))
(/.f64 (+.f64 (*.f64 a1 (*.f64 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)))
(+ (* (* 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 (*.f64 a2 (*.f64 a2 a2)) (*.f64 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 (*.f64 a2 (*.f64 a2 a2)) (*.f64 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)

localize228.0ms (2.1%)

Localize:

Found 19 expressions of interest:

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

Compiled 388 to 41 computations (89.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 56.0ms
ival-mult: 25.0ms (44.4% of total)
ival-div: 8.0ms (14.2% of total)
ival-cos: 7.0ms (12.4% of total)
ival-add: 6.0ms (10.7% of total)
...c/correct-round.rkt:119:19: 4.0ms (7.1% of total)
ival-sqrt: 4.0ms (7.1% of total)
ival-sub: 1.0ms (1.8% of total)
const: 1.0ms (1.8% of total)
backward-pass: 0.0ms (0% of total)

series24.0ms (0.2%)

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

90 calls:

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

rewrite340.0ms (3.2%)

Algorithm
1×batch-egg-rewrite
Rules
3440×*-lowering-*.f32
3440×*-lowering-*.f64
2988×/-lowering-/.f32
2988×/-lowering-/.f64
1654×+-lowering-+.f64
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
040192
1230161
21880157
08338157
Stop Event
1×iter limit
1×node limit
Counts
22 → 654
Calls
Call 1
Inputs
(* (/ (cos th) (sqrt 2)) (* a2 a2))
(/ (cos th) (sqrt 2))
(cos th)
(sqrt 2)
(* a2 (* a2 (sqrt 1/2)))
(* a2 (sqrt 1/2))
(sqrt 1/2)
(* (sqrt 1/2) (+ (* a1 a1) (* a2 a2)))
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
(/ (* (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24))))) (* a2 a2)) (sqrt 2))
(* (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24))))) (* a2 a2))
(+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24)))))
(* th (* th (+ -1/2 (* (* th th) 1/24))))
(+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- 0 (* a1 a1))))
(/ 1 (/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- 0 (* a1 a1)))) (/ (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))) (sqrt 2))))
(/ (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- 0 (* a1 a1)))) (/ (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))) (sqrt 2)))
(* a1 (* a1 (* a1 a1)))
(* a2 a2)
(* (* th th) 1/24)
(* (* a2 a2) (- 0 (* a1 a1)))
(/ (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 (* a2 a2)) (* a2 (* a2 a2)))) (sqrt 2))
Outputs
(/.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) (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 (neg.f64 (*.f64 a2 a2)) (neg.f64 (/.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) #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 (*.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 (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) #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 (*.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 (*.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 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 a2 (/.f64 (*.f64 (cos.f64 th) a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (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 (*.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 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (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))))
(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)))
(*.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))))
(cos.f64 th)
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(exp.f64 (+.f64 (*.f64 #s(literal 2 binary64) (log.f64 a2)) (*.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(exp.f64 (+.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 #s(literal 2 binary64) (log.f64 a2))))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2))
(*.f64 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))) a2)
(*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a2)
(exp.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 1/2 binary64))
(pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)))
(+.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(+.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 2 binary64)) (-.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (-.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))))
(fma.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(fma.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(fma.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))) a2 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)))
(fma.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))
(fma.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) a1) a1 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 2 binary64)) (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 1/2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 1/2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 2 binary64)) (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (neg.f64 (+.f64 (*.f64 (*.f64 a1 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 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 1/2 binary64)))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) #s(literal 2 binary64)) (*.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1))))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 a1 a2)) (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 a1 a2)) (/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (-.f64 a1 a2)))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(-.f64 (/.f64 (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(-.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (*.f64 (*.f64 a1 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))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (+.f64 (*.f64 (*.f64 a1 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 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 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 (neg.f64 (-.f64 (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1)))) (neg.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 (*.f64 a1 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 (*.f64 a1 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 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (-.f64 (*.f64 (*.f64 a1 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 a2 a2) (*.f64 a1 a1)) (+.f64 a1 a2)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 a1 a2)))
(+.f64 (*.f64 a1 a1) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (*.f64 a1 a1))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a1)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(fma.f64 a1 a1 #s(literal 0 binary64))
(/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a1 a1))
(/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(/.f64 (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))
(/.f64 (neg.f64 (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) #s(literal 0 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 a1 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 (*.f64 a1 a1) (/.f64 (*.f64 a1 a1) (*.f64 a1 a1)))
(*.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)))
(*.f64 (/.f64 a1 a1) (/.f64 (*.f64 a1 (*.f64 a1 a1)) a1))
(*.f64 (/.f64 a1 a1) (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 a1))))
(*.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) a1) (/.f64 a1 a1))
(*.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) a1) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))))
(*.f64 (/.f64 (*.f64 a1 a1) a1) (/.f64 (*.f64 a1 a1) a1))
(*.f64 (/.f64 (*.f64 a1 a1) a1) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))))
(*.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 a1))) (/.f64 a1 a1))
(*.f64 (/.f64 a1 (*.f64 a1 a1)) (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a1 a1)))
(*.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a1 a1)) (/.f64 a1 (*.f64 a1 a1)))
(*.f64 (/.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) a1))
(*.f64 (/.f64 (*.f64 a1 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) a1) (/.f64 a1 (*.f64 a1 (*.f64 a1 a1))))
(*.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (/.f64 (*.f64 a1 a1) a1))
(*.f64 (/.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a1 a1))
(*.f64 (/.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) a1))
(*.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) a1) (/.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 a1))))
(*.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 (*.f64 a1 a1))) (/.f64 (*.f64 a1 (*.f64 a1 a1)) a1))
(*.f64 (/.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 a1)) (/.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a1 a1)))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) #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 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) #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 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 a2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a2 a2)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (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 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 a2))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a2 a2))) (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (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 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (*.f64 a2 a2) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (/.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 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) #s(literal -1 binary64)))
(*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(*.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (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 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (pow.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 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) #s(literal -1 binary64)) (/.f64 (neg.f64 (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal -1 binary64)) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (neg.f64 (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal -1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (neg.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) #s(literal -1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (pow.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 a2 a2) #s(literal 1 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(+.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 a2)))
(+.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 a2)) (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)))
(fma.f64 (*.f64 a2 a2) #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(fma.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 a2 a2) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 a2)))
(fma.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 a2) (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a2 a2)) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 a2 a2))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a2 a2))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 1 binary64)) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 a2 a2) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (*.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 a2)) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 a2))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 a2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 a2)) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 a2 a2)) (*.f64 #s(literal 1 binary64) (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 a2)) (*.f64 #s(literal 1 binary64) (*.f64 a2 a2))))))
(*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 a2 a2))
(*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) a2)
(+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(+.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(-.f64 (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64))))
(fma.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64))
(fma.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) #s(literal 1 binary64))
(fma.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 th th) #s(literal 1 binary64))
(fma.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) th #s(literal 1 binary64))
(fma.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 1 binary64) th) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 th th)) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal 1 binary64) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) th #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (neg.f64 (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) #s(literal 1 binary64)) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) #s(literal 1 binary64))) (neg.f64 (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) #s(literal -1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (-.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64))))))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(+.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))
(+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (*.f64 th #s(literal -1/2 binary64)) th) (*.f64 (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) th))
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th)))
(+.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th)) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(fma.f64 th (*.f64 th #s(literal -1/2 binary64)) (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th)))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))
(fma.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))
(fma.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(fma.f64 (*.f64 th #s(literal -1/2 binary64)) th (*.f64 (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) th))
(/.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th th)) #s(literal 1/13824 binary64))))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 (*.f64 th th) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal 1/576 binary64)))) (+.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -1/24 binary64) (*.f64 th th))))
(/.f64 (neg.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th th)) #s(literal 1/13824 binary64)))))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) #s(literal -1/2 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 th th) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal 1/576 binary64))))) (neg.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -1/24 binary64) (*.f64 th th)))))
(/.f64 (+.f64 (pow.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (-.f64 (*.f64 (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (*.f64 th (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 th #s(literal -1/2 binary64)) th) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) th) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 th #s(literal -1/2 binary64)) th) (*.f64 (*.f64 th #s(literal -1/2 binary64)) th)) (-.f64 (*.f64 (*.f64 (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) th) (*.f64 (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) th)) (*.f64 (*.f64 (*.f64 th #s(literal -1/2 binary64)) th) (*.f64 (*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) th)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th)) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th)) (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 (*.f64 (*.f64 (*.f64 th th) #s(literal 1/24 binary64)) (*.f64 th th)) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(*.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))
(*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (*.f64 th th))
(*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) th)
(*.f64 (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 1 binary64))
(*.f64 (*.f64 #s(literal 1 binary64) th) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 th th)) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) th)
(+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(+.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(fma.f64 a2 (neg.f64 (*.f64 a2 (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))
(fma.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))
(fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(fma.f64 (*.f64 a1 a1) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(fma.f64 (*.f64 a1 (*.f64 a1 a1)) a1 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))
(fma.f64 (neg.f64 (*.f64 a2 (*.f64 a1 a1))) a2 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))) (*.f64 (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 a1 a1)) (*.f64 (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (*.f64 (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 a1 a1)))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))))) (*.f64 (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 a1 a1)) (*.f64 (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 a2)))) (*.f64 (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 a1 a1)))
(/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64)))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))) (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64)) (*.f64 a1 a1)) (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64)))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64)))) (*.f64 a1 a1)))
(/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))))) (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64)) (*.f64 a1 a1)) (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 a2)))) (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64)))) (*.f64 a1 a1)))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64)) (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64)) (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 a1 a1)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a1 a1)))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 a1 a1)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a1 a1)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64))))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64))))) (*.f64 (*.f64 a1 a1) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64)))) (*.f64 (*.f64 a1 a1) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64))))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 a2)) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 a2)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64))))) (*.f64 (*.f64 a1 a1) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64)))) (*.f64 (*.f64 a1 a1) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))) (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (neg.f64 (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))))
(pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.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 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64))
(*.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))))
(*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64)))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.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 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal 1 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 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 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))
(*.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(*.f64 (pow.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 #s(literal -1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)) (/.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal -1 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (neg.f64 (*.f64 (log.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64))))
(-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
(-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal 1 binary64))))
(/.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 1 binary64))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(pow.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))
(pow.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 #s(literal -1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal -1 binary64)))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (pow.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal -1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal -1 binary64)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (pow.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (pow.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))))
(*.f64 (pow.f64 (/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.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 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.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 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))
(exp.f64 (*.f64 #s(literal 4 binary64) (log.f64 a1)))
(exp.f64 (*.f64 (log.f64 a1) #s(literal 4 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 a1)) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(fma.f64 a1 (*.f64 a1 (*.f64 a1 a1)) #s(literal 0 binary64))
(fma.f64 (*.f64 a1 a1) (*.f64 a1 a1) #s(literal 0 binary64))
(fma.f64 (*.f64 a1 (*.f64 a1 a1)) a1 #s(literal 0 binary64))
(/.f64 (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(/.f64 (neg.f64 (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (neg.f64 (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64))) (neg.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) #s(literal 0 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) #s(literal 0 binary64)))))
(pow.f64 a1 #s(literal 4 binary64))
(pow.f64 (*.f64 a1 a1) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) #s(literal 2 binary64))
(*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))
(*.f64 (*.f64 a1 a1) (*.f64 a1 a1))
(*.f64 (*.f64 a1 (*.f64 a1 a1)) a1)
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a2)))
(pow.f64 a2 #s(literal 2 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 a2)) #s(literal 2 binary64))
(*.f64 a2 a2)
(*.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)))
(*.f64 th (*.f64 th #s(literal 1/24 binary64)))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(*.f64 #s(literal 1/24 binary64) (*.f64 th th))
(*.f64 (*.f64 th #s(literal 1/24 binary64)) th)
(+.f64 (*.f64 (*.f64 a2 a2) #s(literal 0 binary64)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(+.f64 (*.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(fma.f64 (*.f64 a2 a2) #s(literal 0 binary64) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(fma.f64 #s(literal 0 binary64) (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(neg.f64 (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(/.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))
(/.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 a1 a1))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 a2)) (*.f64 a1 a1))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 a2) #s(literal 0 binary64)) #s(literal 3 binary64)) (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 0 binary64)) (*.f64 (*.f64 a2 a2) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 0 binary64)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal 3 binary64)) (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))))))
(*.f64 a2 (neg.f64 (*.f64 a2 (*.f64 a1 a1))))
(*.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (*.f64 a2 a2))
(*.f64 (neg.f64 (*.f64 a2 (*.f64 a1 a1))) a2)
(*.f64 (/.f64 (*.f64 a2 a2) a1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 a1))))
(*.f64 (/.f64 (*.f64 a2 a2) a1) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) a1))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 a1 (*.f64 a1 a1))) (/.f64 (*.f64 a2 a2) a1))
(*.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 a1 a1)))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 a1 a1)) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 a1))) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) a1))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) a1) (/.f64 (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 a1))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) a1) (/.f64 (*.f64 a2 a2) a1))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.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 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))) (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 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 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.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 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 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 a2 a2) (*.f64 a1 a1)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.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 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))))))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 a1)) (*.f64 a2 (*.f64 a2 a2)))))

simplify273.0ms (2.5%)

Algorithm
1×egg-herbie
Rules
4176×*-lowering-*.f32
4176×*-lowering-*.f64
2770×+-lowering-+.f64
2770×+-lowering-+.f32
2592×/-lowering-/.f32
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
03014483
19683737
232833497
082853497
Stop Event
1×iter limit
1×node limit
Counts
360 → 360
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 (sqrt 2))
(+ (* -1/2 (/ (pow th 2) (sqrt 2))) (/ 1 (sqrt 2)))
(+ (* (pow th 2) (- (* 1/24 (/ (pow th 2) (sqrt 2))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(+ (* (pow th 2) (- (* (pow th 2) (+ (* -1/720 (/ (pow th 2) (sqrt 2))) (* 1/24 (/ 1 (sqrt 2))))) (* 1/2 (/ 1 (sqrt 2))))) (/ 1 (sqrt 2)))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
(/ (cos th) (sqrt 2))
1
(+ 1 (* -1/2 (pow th 2)))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(+ 1 (* (pow th 2) (- (* (pow th 2) (+ 1/24 (* -1/720 (pow th 2)))) 1/2)))
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(cos th)
(* (pow a2 2) (sqrt 1/2))
(* (pow a2 2) (sqrt 1/2))
(* (pow a2 2) (sqrt 1/2))
(* (pow a2 2) (sqrt 1/2))
(* (pow a2 2) (sqrt 1/2))
(* (pow a2 2) (sqrt 1/2))
(* (pow a2 2) (sqrt 1/2))
(* (pow a2 2) (sqrt 1/2))
(* (pow a2 2) (sqrt 1/2))
(* (pow a2 2) (sqrt 1/2))
(* (pow a2 2) (sqrt 1/2))
(* (pow a2 2) (sqrt 1/2))
(* a2 (sqrt 1/2))
(* a2 (sqrt 1/2))
(* a2 (sqrt 1/2))
(* a2 (sqrt 1/2))
(* a2 (sqrt 1/2))
(* a2 (sqrt 1/2))
(* a2 (sqrt 1/2))
(* a2 (sqrt 1/2))
(* a2 (sqrt 1/2))
(* a2 (sqrt 1/2))
(* a2 (sqrt 1/2))
(* a2 (sqrt 1/2))
(* (pow a2 2) (sqrt 1/2))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(* (pow a1 2) (sqrt 1/2))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (sqrt 1/2))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(* (pow a1 2) (sqrt 1/2))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(* (pow a2 2) (sqrt 1/2))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(* (pow a2 2) (sqrt 1/2))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(pow a2 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(* (pow a1 2) (+ 1 (/ (pow a2 2) (pow a1 2))))
(pow a1 2)
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(+ (pow a1 2) (pow a2 2))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(pow a2 2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(/ (pow 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))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(* 1/24 (/ (* (pow a2 2) (pow th 4)) (sqrt 2)))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (* (pow th 2) (sqrt 2)))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (* (pow th 2) (sqrt 2)))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2))))))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (* (pow th 2) (sqrt 2)))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2))))))
(* 1/24 (/ (* (pow a2 2) (pow th 4)) (sqrt 2)))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (* (pow th 2) (sqrt 2)))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (* (pow th 2) (sqrt 2)))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2))))))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (* (pow th 2) (sqrt 2)))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2))))))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(pow a2 2)
(+ (* -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)) (* 1/24 (* (pow a2 2) (pow th 2))))) (pow a2 2))
(* 1/24 (* (pow a2 2) (pow th 4)))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (pow th 2))) (* 1/24 (pow a2 2))))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (pow th 2))) (+ (* 1/24 (pow a2 2)) (/ (pow a2 2) (pow th 4)))))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (pow th 2))) (+ (* 1/24 (pow a2 2)) (/ (pow a2 2) (pow th 4)))))
(* 1/24 (* (pow a2 2) (pow th 4)))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (pow th 2))) (* 1/24 (pow a2 2))))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (pow th 2))) (+ (* 1/24 (pow a2 2)) (/ (pow a2 2) (pow th 4)))))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (pow th 2))) (+ (* 1/24 (pow a2 2)) (/ (pow a2 2) (pow th 4)))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
1
(+ 1 (* -1/2 (pow th 2)))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))
(* 1/24 (pow th 4))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(* (pow th 4) (- (+ 1/24 (/ 1 (pow th 4))) (* 1/2 (/ 1 (pow th 2)))))
(* (pow th 4) (- (+ 1/24 (/ 1 (pow th 4))) (* 1/2 (/ 1 (pow th 2)))))
(* 1/24 (pow th 4))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(* (pow th 4) (- (+ 1/24 (/ 1 (pow th 4))) (* 1/2 (/ 1 (pow th 2)))))
(* (pow th 4) (- (+ 1/24 (/ 1 (pow th 4))) (* 1/2 (/ 1 (pow th 2)))))
(* -1/2 (pow th 2))
(* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))
(* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))
(* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))
(* 1/24 (pow th 4))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(* 1/24 (pow th 4))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(* -1 (* (pow a1 2) (pow a2 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 4)
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(pow a1 4)
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(pow a1 4)
(+ (* -1 (* (pow a1 2) (pow a2 2))) (pow a1 4))
(+ (* -1 (* (pow a1 2) (pow a2 2))) (pow a1 4))
(+ (* -1 (* (pow a1 2) (pow a2 2))) (pow a1 4))
(* -1 (* (pow a1 2) (pow a2 2)))
(* (pow a2 2) (+ (* -1 (pow a1 2)) (/ (pow a1 4) (pow a2 2))))
(* (pow a2 2) (+ (* -1 (pow a1 2)) (/ (pow a1 4) (pow a2 2))))
(* (pow a2 2) (+ (* -1 (pow a1 2)) (/ (pow a1 4) (pow a2 2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(* (pow a2 2) (+ (* -1 (pow a1 2)) (/ (pow a1 4) (pow a2 2))))
(* (pow a2 2) (+ (* -1 (pow a1 2)) (/ (pow a1 4) (pow a2 2))))
(* (pow a2 2) (+ (* -1 (pow a1 2)) (/ (pow a1 4) (pow a2 2))))
(* -1 (/ (pow a2 4) (* (pow a1 2) (sqrt 2))))
(/ (+ (* -1 (/ (* (pow a1 2) (pow a2 2)) (sqrt 2))) (* -1 (/ (pow a2 4) (sqrt 2)))) (pow a1 2))
(/ (+ (* -1 (/ (pow a2 4) (sqrt 2))) (* (pow a1 2) (- (* -1 (/ (pow a1 2) (sqrt 2))) (/ (pow a2 2) (sqrt 2))))) (pow a1 2))
(/ (+ (* -1 (/ (pow a2 4) (sqrt 2))) (* (pow a1 2) (- (* (pow a1 2) (- (* -2 (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))) (/ 1 (sqrt 2)))) (/ (pow a2 2) (sqrt 2))))) (pow a1 2))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (- (+ (/ 1 (sqrt 2)) (/ (pow a2 4) (* (pow a1 4) (sqrt 2)))) (* -1 (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))))
(* (pow a1 2) (- (+ (/ 1 (sqrt 2)) (/ (pow a2 6) (* (pow a1 6) (sqrt 2)))) (+ (* -1 (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (pow a2 4) (* (pow a1 4) (sqrt 2)))) (* -1 (/ (pow a2 6) (* (pow a1 6) (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 4) (* (pow a1 4) (sqrt 2)))) (* -1 (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))))
(* (pow a1 2) (- (+ (/ 1 (sqrt 2)) (/ (pow a2 6) (* (pow a1 6) (sqrt 2)))) (+ (* -1 (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (pow a2 4) (* (pow a1 4) (sqrt 2)))) (* -1 (/ (pow a2 6) (* (pow a1 6) (sqrt 2))))))))
(/ (pow a1 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))
(+ (* (pow a2 2) (+ (* (pow a2 2) (+ (* 2 (/ (pow a2 2) (* (pow a1 4) (sqrt 2)))) (/ 1 (* (pow a1 2) (sqrt 2))))) (/ 1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2)))
(* -1 (/ (pow a2 4) (* (pow a1 2) (sqrt 2))))
(* -1 (* (pow a2 4) (+ (/ 1 (* (pow a1 2) (sqrt 2))) (/ 1 (* (pow a2 2) (sqrt 2))))))
(* (pow a2 4) (- (* -1 (/ (pow a1 2) (* (pow a2 4) (sqrt 2)))) (+ (/ 1 (* (pow a1 2) (sqrt 2))) (/ 1 (* (pow a2 2) (sqrt 2))))))
(* (pow a2 4) (- (* -1 (/ (pow a1 4) (* (pow a2 6) (sqrt 2)))) (+ (/ 1 (* (pow a1 2) (sqrt 2))) (+ (/ 1 (* (pow a2 2) (sqrt 2))) (+ (/ (pow a1 2) (* (pow a2 4) (sqrt 2))) (/ (pow a1 4) (* (pow a2 6) (sqrt 2))))))))
(* -1 (/ (pow a2 4) (* (pow a1 2) (sqrt 2))))
(* -1 (* (pow a2 4) (+ (/ 1 (* (pow a1 2) (sqrt 2))) (/ 1 (* (pow a2 2) (sqrt 2))))))
(* (pow a2 4) (- (* -1 (/ (pow a1 2) (* (pow a2 4) (sqrt 2)))) (+ (/ 1 (* (pow a1 2) (sqrt 2))) (/ 1 (* (pow a2 2) (sqrt 2))))))
(* (pow a2 4) (- (* -1 (/ (pow a1 4) (* (pow a2 6) (sqrt 2)))) (+ (/ 1 (* (pow a1 2) (sqrt 2))) (+ (/ 1 (* (pow a2 2) (sqrt 2))) (+ (/ (pow a1 2) (* (pow a2 4) (sqrt 2))) (/ (pow a1 4) (* (pow a2 6) (sqrt 2))))))))
(* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 4)))
(* (pow a1 2) (+ (* -1 (/ (sqrt 2) (pow a2 4))) (/ (* (pow a1 2) (sqrt 2)) (pow a2 6))))
(* (pow a1 2) (+ (* -1 (/ (sqrt 2) (pow a2 4))) (* (pow a1 2) (+ (/ (sqrt 2) (pow a2 6)) (/ (* (pow a1 4) (sqrt 2)) (pow a2 10))))))
(* (pow a1 2) (+ (* -1 (/ (sqrt 2) (pow a2 4))) (* (pow a1 2) (+ (* (pow a1 4) (- (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 12))) (* -1 (/ (sqrt 2) (pow a2 10))))) (/ (sqrt 2) (pow a2 6))))))
(/ (sqrt 2) (pow a1 2))
(/ (+ (sqrt 2) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (pow a1 2))
(/ (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (* -1 (/ (* (pow a2 6) (sqrt 2)) (pow a1 6))))) (pow a1 2))
(/ (- (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 8) (sqrt 2)) (pow a1 8)))) (/ (* (pow a2 6) (sqrt 2)) (pow a1 6))) (pow a1 2))
(/ (sqrt 2) (pow a1 2))
(/ (+ (sqrt 2) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (pow a1 2))
(/ (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (* -1 (/ (* (pow a2 6) (sqrt 2)) (pow a1 6))))) (pow a1 2))
(/ (- (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 8) (sqrt 2)) (pow a1 8)))) (/ (* (pow a2 6) (sqrt 2)) (pow a1 6))) (pow a1 2))
(/ (sqrt 2) (pow a1 2))
(+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 4))) (/ (sqrt 2) (pow a1 2)))
(+ (* (pow a2 2) (+ (* -1 (/ (sqrt 2) (pow a1 4))) (* -1 (/ (* (pow a2 4) (sqrt 2)) (pow a1 8))))) (/ (sqrt 2) (pow a1 2)))
(+ (* (pow a2 2) (+ (* -1 (/ (sqrt 2) (pow a1 4))) (* (pow a2 4) (- (/ (* (pow a2 2) (sqrt 2)) (pow a1 10)) (/ (sqrt 2) (pow a1 8)))))) (/ (sqrt 2) (pow a1 2)))
(* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 4)))
(/ (+ (* -1 (* (pow a1 2) (sqrt 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 2))) (pow a2 4))
(/ (+ (* -1 (* (pow a1 2) (sqrt 2))) (+ (/ (* (pow a1 4) (sqrt 2)) (pow a2 2)) (/ (* (pow a1 8) (sqrt 2)) (pow a2 6)))) (pow a2 4))
(/ (- (+ (* -1 (* (pow a1 2) (sqrt 2))) (+ (* -1 (/ (* (pow a1 10) (sqrt 2)) (pow a2 8))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 2)))) (* -1 (/ (* (pow a1 8) (sqrt 2)) (pow a2 6)))) (pow a2 4))
(* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 4)))
(/ (+ (* -1 (* (pow a1 2) (sqrt 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 2))) (pow a2 4))
(/ (+ (* -1 (* (pow a1 2) (sqrt 2))) (+ (/ (* (pow a1 4) (sqrt 2)) (pow a2 2)) (/ (* (pow a1 8) (sqrt 2)) (pow a2 6)))) (pow a2 4))
(/ (- (+ (* -1 (* (pow a1 2) (sqrt 2))) (+ (* -1 (/ (* (pow a1 10) (sqrt 2)) (pow a2 8))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 2)))) (* -1 (/ (* (pow a1 8) (sqrt 2)) (pow a2 6)))) (pow a2 4))
(pow a1 4)
(pow a1 4)
(pow a1 4)
(pow a1 4)
(pow a1 4)
(pow a1 4)
(pow a1 4)
(pow a1 4)
(pow a1 4)
(pow a1 4)
(pow a1 4)
(pow a1 4)
(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/24 (pow th 2))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
(* 1/24 (pow th 2))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(/ (pow a2 6) (sqrt 2))
(+ (/ (pow a1 6) (sqrt 2)) (/ (pow a2 6) (sqrt 2)))
(+ (/ (pow a1 6) (sqrt 2)) (/ (pow a2 6) (sqrt 2)))
(+ (/ (pow a1 6) (sqrt 2)) (/ (pow a2 6) (sqrt 2)))
(/ (pow a1 6) (sqrt 2))
(* (pow a1 6) (+ (/ 1 (sqrt 2)) (/ (pow a2 6) (* (pow a1 6) (sqrt 2)))))
(* (pow a1 6) (+ (/ 1 (sqrt 2)) (/ (pow a2 6) (* (pow a1 6) (sqrt 2)))))
(* (pow a1 6) (+ (/ 1 (sqrt 2)) (/ (pow a2 6) (* (pow a1 6) (sqrt 2)))))
(/ (pow a1 6) (sqrt 2))
(* (pow a1 6) (+ (/ 1 (sqrt 2)) (/ (pow a2 6) (* (pow a1 6) (sqrt 2)))))
(* (pow a1 6) (+ (/ 1 (sqrt 2)) (/ (pow a2 6) (* (pow a1 6) (sqrt 2)))))
(* (pow a1 6) (+ (/ 1 (sqrt 2)) (/ (pow a2 6) (* (pow a1 6) (sqrt 2)))))
(/ (pow a1 6) (sqrt 2))
(+ (/ (pow a1 6) (sqrt 2)) (/ (pow a2 6) (sqrt 2)))
(+ (/ (pow a1 6) (sqrt 2)) (/ (pow a2 6) (sqrt 2)))
(+ (/ (pow a1 6) (sqrt 2)) (/ (pow a2 6) (sqrt 2)))
(/ (pow a2 6) (sqrt 2))
(* (pow a2 6) (+ (/ 1 (sqrt 2)) (/ (pow a1 6) (* (pow a2 6) (sqrt 2)))))
(* (pow a2 6) (+ (/ 1 (sqrt 2)) (/ (pow a1 6) (* (pow a2 6) (sqrt 2)))))
(* (pow a2 6) (+ (/ 1 (sqrt 2)) (/ (pow a1 6) (* (pow a2 6) (sqrt 2)))))
(/ (pow a2 6) (sqrt 2))
(* (pow a2 6) (+ (/ 1 (sqrt 2)) (/ (pow a1 6) (* (pow a2 6) (sqrt 2)))))
(* (pow a2 6) (+ (/ 1 (sqrt 2)) (/ (pow a1 6) (* (pow a2 6) (sqrt 2)))))
(* (pow a2 6) (+ (/ 1 (sqrt 2)) (/ (pow a1 6) (* (pow a2 6) (sqrt 2)))))
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 #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 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ 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)))
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 1/2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (sqrt 1/2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (sqrt 1/2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (sqrt 1/2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (sqrt 1/2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (sqrt 1/2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (sqrt 1/2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (sqrt 1/2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (sqrt 1/2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (sqrt 1/2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (sqrt 1/2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (sqrt 1/2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(* a2 (sqrt 1/2))
(*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))
(* a2 (sqrt 1/2))
(*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))
(* a2 (sqrt 1/2))
(*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))
(* a2 (sqrt 1/2))
(*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))
(* a2 (sqrt 1/2))
(*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))
(* a2 (sqrt 1/2))
(*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))
(* a2 (sqrt 1/2))
(*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))
(* a2 (sqrt 1/2))
(*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))
(* a2 (sqrt 1/2))
(*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))
(* a2 (sqrt 1/2))
(*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))
(* a2 (sqrt 1/2))
(*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))
(* a2 (sqrt 1/2))
(*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))
(* (pow a2 2) (sqrt 1/2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(* (pow a1 2) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 a1 a1))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 a1 a1))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 a1 a1))))
(* (pow a1 2) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 a1 a1))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 a1 a1))))
(* (pow a1 2) (+ (sqrt 1/2) (/ (* (pow a2 2) (sqrt 1/2)) (pow a1 2))))
(*.f64 (*.f64 a1 a1) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 a1 a1))))
(* (pow a1 2) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(+ (* (pow a1 2) (sqrt 1/2)) (* (pow a2 2) (sqrt 1/2)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(* (pow a2 2) (sqrt 1/2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 a2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 a2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 a2))))
(* (pow a2 2) (sqrt 1/2))
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 a2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.f64 a2 a2))))
(* (pow a2 2) (+ (sqrt 1/2) (/ (* (pow a1 2) (sqrt 1/2)) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a1 a1)) (*.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 a2 a2) (*.f64 a1 a1))))
(* (pow a1 2) (+ 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 (/ (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)
(*.f64 a1 a1)
(* (pow a1 2) (+ 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 (/ (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 (/ (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)
(*.f64 a1 a1)
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(pow a2 2)
(*.f64 a2 a2)
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(* (pow a2 2) (+ 1 (/ (pow a1 2) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(/ (pow 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))) (* 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))))))
(* 1/24 (/ (* (pow a2 2) (pow th 4)) (sqrt 2)))
(/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (* (pow th 2) (sqrt 2)))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (* (pow th 2) (sqrt 2)))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2))))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (*.f64 th th)))))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (* (pow th 2) (sqrt 2)))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2))))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (*.f64 th th)))))
(* 1/24 (/ (* (pow a2 2) (pow th 4)) (sqrt 2)))
(/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (* (pow th 2) (sqrt 2)))) (* 1/24 (/ (pow a2 2) (sqrt 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (* (pow th 2) (sqrt 2)))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2))))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (*.f64 th th)))))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (* (pow th 2) (sqrt 2)))) (+ (* 1/24 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 4) (sqrt 2))))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (*.f64 th th)))))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(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 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* 1/24 (* (pow a2 2) (pow th 2))))) (pow a2 2))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(* 1/24 (* (pow a2 2) (pow th 4)))
(*.f64 (*.f64 th th) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (pow th 2))) (* 1/24 (pow a2 2))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (pow th 2))) (+ (* 1/24 (pow a2 2)) (/ (pow a2 2) (pow th 4)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (*.f64 th th)))))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (pow th 2))) (+ (* 1/24 (pow a2 2)) (/ (pow a2 2) (pow th 4)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (*.f64 th th)))))
(* 1/24 (* (pow a2 2) (pow th 4)))
(*.f64 (*.f64 th th) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (pow th 2))) (* 1/24 (pow a2 2))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (pow th 2))) (+ (* 1/24 (pow a2 2)) (/ (pow a2 2) (pow th 4)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (*.f64 th th)))))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (pow th 2))) (+ (* 1/24 (pow a2 2)) (/ (pow a2 2) (pow th 4)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (*.f64 th th)))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
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) (- (* 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/24 (pow th 4))
(*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow th 4) (- (+ 1/24 (/ 1 (pow th 4))) (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))
(* (pow th 4) (- (+ 1/24 (/ 1 (pow th 4))) (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))
(* 1/24 (pow th 4))
(*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow th 4) (- (+ 1/24 (/ 1 (pow th 4))) (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))
(* (pow th 4) (- (+ 1/24 (/ 1 (pow th 4))) (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))
(*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))
(*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))
(*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(* 1/24 (pow th 4))
(*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* 1/24 (pow th 4))
(*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) (*.f64 th th)))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* (pow a1 2) (+ (* -1 (pow a2 2)) (pow a1 2)))
(*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (pow a1 2) (+ (* -1 (pow a2 2)) (pow a1 2)))
(*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* (pow a1 2) (+ (* -1 (pow a2 2)) (pow a1 2)))
(*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(pow a1 4)
(*.f64 (*.f64 a1 a1) (*.f64 a1 a1))
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(pow a1 4)
(*.f64 (*.f64 a1 a1) (*.f64 a1 a1))
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(* (pow a1 4) (+ 1 (* -1 (/ (pow a2 2) (pow a1 2)))))
(*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(pow a1 4)
(*.f64 (*.f64 a1 a1) (*.f64 a1 a1))
(+ (* -1 (* (pow a1 2) (pow a2 2))) (pow a1 4))
(*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (* -1 (* (pow a1 2) (pow a2 2))) (pow a1 4))
(*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+ (* -1 (* (pow a1 2) (pow a2 2))) (pow a1 4))
(*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* (pow a2 2) (+ (* -1 (pow a1 2)) (/ (pow a1 4) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 a2)) (*.f64 a1 a1)))
(* (pow a2 2) (+ (* -1 (pow a1 2)) (/ (pow a1 4) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 a2)) (*.f64 a1 a1)))
(* (pow a2 2) (+ (* -1 (pow a1 2)) (/ (pow a1 4) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 a2)) (*.f64 a1 a1)))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* (pow a2 2) (+ (* -1 (pow a1 2)) (/ (pow a1 4) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 a2)) (*.f64 a1 a1)))
(* (pow a2 2) (+ (* -1 (pow a1 2)) (/ (pow a1 4) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 a2)) (*.f64 a1 a1)))
(* (pow a2 2) (+ (* -1 (pow a1 2)) (/ (pow a1 4) (pow a2 2))))
(*.f64 (*.f64 a2 a2) (-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 a2)) (*.f64 a1 a1)))
(* -1 (/ (pow a2 4) (* (pow a1 2) (sqrt 2))))
(/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(/ (+ (* -1 (/ (* (pow a1 2) (pow a2 2)) (sqrt 2))) (* -1 (/ (pow a2 4) (sqrt 2)))) (pow a1 2))
(/.f64 (-.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))
(/ (+ (* -1 (/ (pow a2 4) (sqrt 2))) (* (pow a1 2) (- (* -1 (/ (pow a1 2) (sqrt 2))) (/ (pow a2 2) (sqrt 2))))) (pow a1 2))
(/.f64 (-.f64 (neg.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a1 a1))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))
(/ (+ (* -1 (/ (pow a2 4) (sqrt 2))) (* (pow a1 2) (- (* (pow a1 2) (- (* -2 (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))) (/ 1 (sqrt 2)))) (/ (pow a2 2) (sqrt 2))))) (pow a1 2))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) #s(literal -2 binary64))) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))) (/.f64 (*.f64 (*.f64 a2 a2) (*.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 4) (* (pow a1 4) (sqrt 2)))) (* -1 (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))))
(*.f64 (*.f64 a1 a1) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (- (+ (/ 1 (sqrt 2)) (/ (pow a2 6) (* (pow a1 6) (sqrt 2)))) (+ (* -1 (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (pow a2 4) (* (pow a1 4) (sqrt 2)))) (* -1 (/ (pow a2 6) (* (pow a1 6) (sqrt 2))))))))
(*.f64 a1 (*.f64 a1 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))))))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 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 4) (* (pow a1 4) (sqrt 2)))) (* -1 (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))))
(*.f64 (*.f64 a1 a1) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 2) (- (+ (/ 1 (sqrt 2)) (/ (pow a2 6) (* (pow a1 6) (sqrt 2)))) (+ (* -1 (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))) (+ (* -1 (/ (pow a2 4) (* (pow a1 4) (sqrt 2)))) (* -1 (/ (pow a2 6) (* (pow a1 6) (sqrt 2))))))))
(*.f64 a1 (*.f64 a1 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (/.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))))))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(+ (* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2))))) (/ (pow a1 2) (sqrt 2)))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(+ (* (pow a2 2) (+ (* (pow a2 2) (+ (* 2 (/ (pow a2 2) (* (pow a1 4) (sqrt 2)))) (/ 1 (* (pow a1 2) (sqrt 2))))) (/ 1 (sqrt 2)))) (/ (pow a1 2) (sqrt 2)))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (+.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))))
(* -1 (/ (pow a2 4) (* (pow a1 2) (sqrt 2))))
(/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(* -1 (* (pow a2 4) (+ (/ 1 (* (pow a1 2) (sqrt 2))) (/ 1 (* (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (+.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 #s(literal -1 binary64) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a2 4) (- (* -1 (/ (pow a1 2) (* (pow a2 4) (sqrt 2)))) (+ (/ 1 (* (pow a1 2) (sqrt 2))) (/ 1 (* (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (+.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 #s(literal -1 binary64) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))))
(* (pow a2 4) (- (* -1 (/ (pow a1 4) (* (pow a2 6) (sqrt 2)))) (+ (/ 1 (* (pow a1 2) (sqrt 2))) (+ (/ 1 (* (pow a2 2) (sqrt 2))) (+ (/ (pow a1 2) (* (pow a2 4) (sqrt 2))) (/ (pow a1 4) (* (pow a2 6) (sqrt 2))))))))
(*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (-.f64 (+.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 #s(literal -1 binary64) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))
(* -1 (/ (pow a2 4) (* (pow a1 2) (sqrt 2))))
(/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(* -1 (* (pow a2 4) (+ (/ 1 (* (pow a1 2) (sqrt 2))) (/ 1 (* (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (+.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 #s(literal -1 binary64) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))))
(* (pow a2 4) (- (* -1 (/ (pow a1 2) (* (pow a2 4) (sqrt 2)))) (+ (/ 1 (* (pow a1 2) (sqrt 2))) (/ 1 (* (pow a2 2) (sqrt 2))))))
(*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (+.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 #s(literal -1 binary64) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))))
(* (pow a2 4) (- (* -1 (/ (pow a1 4) (* (pow a2 6) (sqrt 2)))) (+ (/ 1 (* (pow a1 2) (sqrt 2))) (+ (/ 1 (* (pow a2 2) (sqrt 2))) (+ (/ (pow a1 2) (* (pow a2 4) (sqrt 2))) (/ (pow a1 4) (* (pow a2 6) (sqrt 2))))))))
(*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (-.f64 (+.f64 (/.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 #s(literal -1 binary64) (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (/.f64 (*.f64 a1 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 6 binary64)))))) (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))
(* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 4)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))
(* (pow a1 2) (+ (* -1 (/ (sqrt 2) (pow a2 4))) (/ (* (pow a1 2) (sqrt 2)) (pow a2 6))))
(*.f64 (*.f64 a1 a1) (-.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))
(* (pow a1 2) (+ (* -1 (/ (sqrt 2) (pow a2 4))) (* (pow a1 2) (+ (/ (sqrt 2) (pow a2 6)) (/ (* (pow a1 4) (sqrt 2)) (pow a2 10))))))
(*.f64 (*.f64 a1 a1) (-.f64 (*.f64 (*.f64 a1 a1) (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 10 binary64)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))
(* (pow a1 2) (+ (* -1 (/ (sqrt 2) (pow a2 4))) (* (pow a1 2) (+ (* (pow a1 4) (- (* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 12))) (* -1 (/ (sqrt 2) (pow a2 10))))) (/ (sqrt 2) (pow a2 6))))))
(*.f64 (*.f64 a1 a1) (-.f64 (*.f64 (*.f64 a1 a1) (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (*.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 10 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (pow.f64 a2 #s(literal 12 binary64))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))
(/ (sqrt 2) (pow a1 2))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(/ (+ (sqrt 2) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (pow a1 2))
(/.f64 (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))) (*.f64 a1 a1))
(/ (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (* -1 (/ (* (pow a2 6) (sqrt 2)) (pow a1 6))))) (pow a1 2))
(/.f64 (-.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))) (*.f64 a1 a1))
(/ (- (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 8) (sqrt 2)) (pow a1 8)))) (/ (* (pow a2 6) (sqrt 2)) (pow a1 6))) (pow a1 2))
(/.f64 (+.f64 (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a2 #s(literal 8 binary64)) (pow.f64 a1 #s(literal 8 binary64))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))) (*.f64 a1 a1))
(/ (sqrt 2) (pow a1 2))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(/ (+ (sqrt 2) (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2)))) (pow a1 2))
(/.f64 (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))) (*.f64 a1 a1))
(/ (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (* -1 (/ (* (pow a2 6) (sqrt 2)) (pow a1 6))))) (pow a1 2))
(/.f64 (-.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))) (*.f64 a1 a1))
(/ (- (+ (sqrt 2) (+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 2))) (/ (* (pow a2 8) (sqrt 2)) (pow a1 8)))) (/ (* (pow a2 6) (sqrt 2)) (pow a1 6))) (pow a1 2))
(/.f64 (+.f64 (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (pow.f64 a2 #s(literal 8 binary64)) (pow.f64 a1 #s(literal 8 binary64))) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64)))))) (*.f64 a1 a1))
(/ (sqrt 2) (pow a1 2))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))
(+ (* -1 (/ (* (pow a2 2) (sqrt 2)) (pow a1 4))) (/ (sqrt 2) (pow a1 2)))
(/.f64 (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))) (*.f64 a1 a1))
(+ (* (pow a2 2) (+ (* -1 (/ (sqrt 2) (pow a1 4))) (* -1 (/ (* (pow a2 4) (sqrt 2)) (pow a1 8))))) (/ (sqrt 2) (pow a1 2)))
(-.f64 (/.f64 (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))) (*.f64 a1 a1)) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (pow.f64 a1 #s(literal 8 binary64))) (*.f64 a2 a2)))
(+ (* (pow a2 2) (+ (* -1 (/ (sqrt 2) (pow a1 4))) (* (pow a2 4) (- (/ (* (pow a2 2) (sqrt 2)) (pow a1 10)) (/ (sqrt 2) (pow a1 8)))))) (/ (sqrt 2) (pow a1 2)))
(+.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (/.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 a1 #s(literal 10 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 8 binary64)))))) (/.f64 (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))) (*.f64 a1 a1)))
(* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 4)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))
(/ (+ (* -1 (* (pow a1 2) (sqrt 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 2))) (pow a2 4))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 a2)) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))
(/ (+ (* -1 (* (pow a1 2) (sqrt 2))) (+ (/ (* (pow a1 4) (sqrt 2)) (pow a2 2)) (/ (* (pow a1 8) (sqrt 2)) (pow a2 6)))) (pow a2 4))
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 a2)) (*.f64 a1 a1))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 8 binary64))) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))
(/ (- (+ (* -1 (* (pow a1 2) (sqrt 2))) (+ (* -1 (/ (* (pow a1 10) (sqrt 2)) (pow a2 8))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 2)))) (* -1 (/ (* (pow a1 8) (sqrt 2)) (pow a2 6)))) (pow a2 4))
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 a2)) (/.f64 (pow.f64 a1 #s(literal 8 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (/.f64 (pow.f64 a1 #s(literal 10 binary64)) (pow.f64 a2 #s(literal 8 binary64)))))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))
(* -1 (/ (* (pow a1 2) (sqrt 2)) (pow a2 4)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))
(/ (+ (* -1 (* (pow a1 2) (sqrt 2))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 2))) (pow a2 4))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 a2)) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))
(/ (+ (* -1 (* (pow a1 2) (sqrt 2))) (+ (/ (* (pow a1 4) (sqrt 2)) (pow a2 2)) (/ (* (pow a1 8) (sqrt 2)) (pow a2 6)))) (pow a2 4))
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 a2)) (*.f64 a1 a1))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 8 binary64))) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))
(/ (- (+ (* -1 (* (pow a1 2) (sqrt 2))) (+ (* -1 (/ (* (pow a1 10) (sqrt 2)) (pow a2 8))) (/ (* (pow a1 4) (sqrt 2)) (pow a2 2)))) (* -1 (/ (* (pow a1 8) (sqrt 2)) (pow a2 6)))) (pow a2 4))
(/.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 a2 a2)) (/.f64 (pow.f64 a1 #s(literal 8 binary64)) (pow.f64 a2 #s(literal 6 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (/.f64 (pow.f64 a1 #s(literal 10 binary64)) (pow.f64 a2 #s(literal 8 binary64)))))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))
(pow a1 4)
(*.f64 (*.f64 a1 a1) (*.f64 a1 a1))
(pow a1 4)
(*.f64 (*.f64 a1 a1) (*.f64 a1 a1))
(pow a1 4)
(*.f64 (*.f64 a1 a1) (*.f64 a1 a1))
(pow a1 4)
(*.f64 (*.f64 a1 a1) (*.f64 a1 a1))
(pow a1 4)
(*.f64 (*.f64 a1 a1) (*.f64 a1 a1))
(pow a1 4)
(*.f64 (*.f64 a1 a1) (*.f64 a1 a1))
(pow a1 4)
(*.f64 (*.f64 a1 a1) (*.f64 a1 a1))
(pow a1 4)
(*.f64 (*.f64 a1 a1) (*.f64 a1 a1))
(pow a1 4)
(*.f64 (*.f64 a1 a1) (*.f64 a1 a1))
(pow a1 4)
(*.f64 (*.f64 a1 a1) (*.f64 a1 a1))
(pow a1 4)
(*.f64 (*.f64 a1 a1) (*.f64 a1 a1))
(pow a1 4)
(*.f64 (*.f64 a1 a1) (*.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)
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* 1/24 (pow th 2))
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(* -1 (* (pow a1 2) (pow a2 2)))
(*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(/ (pow a2 6) (sqrt 2))
(/.f64 (pow.f64 a2 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 6) (sqrt 2)) (/ (pow a2 6) (sqrt 2)))
(+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 6) (sqrt 2)) (/ (pow a2 6) (sqrt 2)))
(+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 6) (sqrt 2)) (/ (pow a2 6) (sqrt 2)))
(+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/ (pow a1 6) (sqrt 2))
(/.f64 (pow.f64 a1 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 6) (+ (/ 1 (sqrt 2)) (/ (pow a2 6) (* (pow a1 6) (sqrt 2)))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 6) (+ (/ 1 (sqrt 2)) (/ (pow a2 6) (* (pow a1 6) (sqrt 2)))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 6) (+ (/ 1 (sqrt 2)) (/ (pow a2 6) (* (pow a1 6) (sqrt 2)))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a1 6) (sqrt 2))
(/.f64 (pow.f64 a1 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 6) (+ (/ 1 (sqrt 2)) (/ (pow a2 6) (* (pow a1 6) (sqrt 2)))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 6) (+ (/ 1 (sqrt 2)) (/ (pow a2 6) (* (pow a1 6) (sqrt 2)))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(* (pow a1 6) (+ (/ 1 (sqrt 2)) (/ (pow a2 6) (* (pow a1 6) (sqrt 2)))))
(*.f64 (pow.f64 a1 #s(literal 6 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(/ (pow a1 6) (sqrt 2))
(/.f64 (pow.f64 a1 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 6) (sqrt 2)) (/ (pow a2 6) (sqrt 2)))
(+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 6) (sqrt 2)) (/ (pow a2 6) (sqrt 2)))
(+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(+ (/ (pow a1 6) (sqrt 2)) (/ (pow a2 6) (sqrt 2)))
(+.f64 (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/ (pow a2 6) (sqrt 2))
(/.f64 (pow.f64 a2 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 6) (+ (/ 1 (sqrt 2)) (/ (pow a1 6) (* (pow a2 6) (sqrt 2)))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))
(* (pow a2 6) (+ (/ 1 (sqrt 2)) (/ (pow a1 6) (* (pow a2 6) (sqrt 2)))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))
(* (pow a2 6) (+ (/ 1 (sqrt 2)) (/ (pow a1 6) (* (pow a2 6) (sqrt 2)))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))
(/ (pow a2 6) (sqrt 2))
(/.f64 (pow.f64 a2 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 6) (+ (/ 1 (sqrt 2)) (/ (pow a1 6) (* (pow a2 6) (sqrt 2)))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))
(* (pow a2 6) (+ (/ 1 (sqrt 2)) (/ (pow a1 6) (* (pow a2 6) (sqrt 2)))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))
(* (pow a2 6) (+ (/ 1 (sqrt 2)) (/ (pow a1 6) (* (pow a2 6) (sqrt 2)))))
(*.f64 (pow.f64 a2 #s(literal 6 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a1 #s(literal 6 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 6 binary64))))))

eval162.0ms (1.5%)

Compiler

Compiled 59731 to 3560 computations (94% saved)

prune184.0ms (1.7%)

Pruning

42 alts after pruning (35 fresh and 7 done)

PrunedKeptTotal
New1344121356
Fresh62329
Picked145
Done033
Total1351421393
Accuracy
100.0%
Counts
1393 → 42
Alt Table
Click to see full alt table
StatusAccuracyProgram
17.1%
(/.f64 (/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
1.1%
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
67.2%
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
1.1%
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
1.1%
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (sqrt.f64 #s(literal 2 binary64)))
9.1%
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (+.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)))
✓60.8%
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
60.4%
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
14.5%
(/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
✓99.4%
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
67.0%
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
14.9%
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
14.9%
(/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
9.1%
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (*.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 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 (*.f64 a2 (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
9.2%
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 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)))) (sqrt.f64 #s(literal 2 binary64)))))
0.5%
(/.f64 #s(literal 1 binary64) (/.f64 (*.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)))))
0.5%
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 (*.f64 a1 (-.f64 #s(literal 0 binary64) (*.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)))))
8.7%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))) (/.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))))
15.1%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (/.f64 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
67.0%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
49.5%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a2 a2) a1) a1))))))
14.9%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
67.2%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
1.1%
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (sqrt.f64 #s(literal 2 binary64))))
16.7%
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
9.1%
(/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))))) (/.f64 #s(literal -1 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))))) (sqrt.f64 #s(literal 2 binary64))))))
6.0%
(*.f64 (/.f64 (/.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 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 (*.f64 a2 (+.f64 a2 a1)) (-.f64 a2 a1)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
1.2%
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
15.0%
(*.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))))))
✓99.3%
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
14.9%
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) a1)))
66.9%
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
9.1%
(*.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 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))))
60.7%
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
67.0%
(*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 1/2 binary64)))
✓67.2%
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
62.9%
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (+.f64 a1 a2)) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 a1 a2))))
59.4%
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 (*.f64 a2 (+.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)))))))))))
✓99.4%
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))
✓67.0%
(*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 1/2 binary64))))
✓14.9%
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
14.9%
(*.f64 a1 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
Compiler

Compiled 3033 to 893 computations (70.6% saved)

regimes155.0ms (1.4%)

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

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

Compiled 59 to 40 computations (32.2% saved)

regimes131.0ms (1.2%)

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

7 calls:

20.0ms
th
18.0ms
a1
17.0ms
a2
17.0ms
(*.f64 a2 a2)
16.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)

regimes127.0ms (1.2%)

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

7 calls:

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

Compiled 37 to 28 computations (24.3% saved)

regimes125.0ms (1.2%)

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

7 calls:

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

Compiled 37 to 28 computations (24.3% saved)

regimes144.0ms (1.3%)

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

7 calls:

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

Compiled 37 to 28 computations (24.3% saved)

regimes80.0ms (0.7%)

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

5 calls:

16.0ms
a2
16.0ms
a1
16.0ms
th
15.0ms
(*.f64 a2 a2)
13.0ms
(*.f64 a1 a1)
Results
AccuracySegmentsBranch
68.9%2a1
70.8%3a2
67.2%1th
68.9%2(*.f64 a1 a1)
67.2%1(*.f64 a2 a2)
Compiler

Compiled 24 to 17 computations (29.2% saved)

regimes8.0ms (0.1%)

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

1 calls:

7.0ms
a2
Results
AccuracySegmentsBranch
70.8%3a2
Compiler

Compiled 4 to 3 computations (25% saved)

regimes24.0ms (0.2%)

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

4 calls:

6.0ms
a2
5.0ms
a1
5.0ms
(*.f64 a2 a2)
5.0ms
(*.f64 a1 a1)
Results
AccuracySegmentsBranch
67.2%1(*.f64 a2 a2)
67.2%1a1
67.2%1(*.f64 a1 a1)
67.2%1a2
Compiler

Compiled 20 to 14 computations (30% saved)

regimes28.0ms (0.3%)

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

5 calls:

6.0ms
th
5.0ms
a2
5.0ms
a1
5.0ms
(*.f64 a2 a2)
4.0ms
(*.f64 a1 a1)
Results
AccuracySegmentsBranch
67.2%1a1
67.2%1th
67.2%1(*.f64 a1 a1)
67.2%1a2
67.2%1(*.f64 a2 a2)
Compiler

Compiled 24 to 17 computations (29.2% saved)

regimes20.0ms (0.2%)

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

5 calls:

4.0ms
a2
4.0ms
th
4.0ms
(*.f64 a1 a1)
4.0ms
a1
4.0ms
(*.f64 a2 a2)
Results
AccuracySegmentsBranch
67.0%1a1
67.0%1th
67.0%1(*.f64 a1 a1)
67.0%1a2
67.0%1(*.f64 a2 a2)
Compiler

Compiled 24 to 17 computations (29.2% saved)

regimes5.0ms (0%)

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

3 calls:

2.0ms
a1
2.0ms
th
2.0ms
a2
Results
AccuracySegmentsBranch
67.0%1th
67.0%1a1
67.0%1a2
Compiler

Compiled 12 to 9 computations (25% saved)

regimes5.0ms (0%)

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

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

3 calls:

1.0ms
a1
1.0ms
a2
1.0ms
th
Results
AccuracySegmentsBranch
14.9%1th
14.9%1a1
14.9%1a2
Compiler

Compiled 12 to 9 computations (25% saved)

bsearch11.0ms (0.1%)

Algorithm
2×binary-search
Stop Event
1×predicate-same
1×narrow-enough
Steps
TimeLeftRight
2.0ms
2.7054457173066633e+290
1.0615794197887489e+292
7.0ms
1.455478024001181e+225
2.025201089786312e+225
Results
7.0ms64×0valid
Compiler

Compiled 180 to 128 computations (28.9% saved)

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

bsearch33.0ms (0.3%)

Algorithm
2×binary-search
Stop Event
1×predicate-same
1×narrow-enough
Steps
TimeLeftRight
14.0ms
2.7054457173066633e+290
1.0615794197887489e+292
17.0ms
9.373385654569456e+219
6.368423173687873e+221
Results
24.0ms192×0valid
Compiler

Compiled 420 to 316 computations (24.8% saved)

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

simplify9.0ms (0.1%)

Algorithm
1×egg-herbie
Rules
28×*-commutative_binary64
4×+-commutative_binary64
2×1-exp_binary64
2×1-exp_binary32
Iterations

Useful iterations: 0 (0.0ms)

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

soundness1.9s (17.8%)

Rules
5324×+-lowering-+.f64
5324×+-lowering-+.f32
5250×*-lowering-*.f32
5250×*-lowering-*.f64
4952×*-lowering-*.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03755513
112444507
243594245
082744245
01211
12911
26011
39511
412111
512511
012511
046191
1279172
22306172
09197172
01582679
15721963
223471839
359551823
086821823
029139
1155129
21263129
08447129
02505752
18894574
236304316
084384316
01560
18260
273360
0888560
Stop Event
1×fuel
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×saturated
1×iter limit
1×node limit
Compiler

Compiled 715 to 433 computations (39.4% saved)

preprocess96.0ms (0.9%)

Remove

(sort a1 a2)

(abs th)

(abs a2)

(abs a1)

Compiler

Compiled 1312 to 740 computations (43.6% saved)

end0.0ms (0%)

Profiling

Loading profile data...