Migdal et al, Equation (64)

Time bar (total: 10.3s)

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.2s (12.2%)

Results
981.0ms8256×0valid
Precisions
Click to see histograms. Total time spent on operations: 606.0ms
ival-mult: 213.0ms (35.2% of total)
ival-cos: 199.0ms (32.8% of total)
ival-sqrt: 68.0ms (11.2% of total)
ival-div: 60.0ms (9.9% of total)
ival-add: 51.0ms (8.4% of total)
const: 13.0ms (2.1% of total)
backward-pass: 3.0ms (0.5% of total)
Bogosity

preprocess76.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)

explain136.0ms (1.3%)

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

Compiled 142 to 38 computations (73.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 36.0ms
ival-cos: 12.0ms (33% of total)
ival-mult: 12.0ms (33% of total)
ival-div: 4.0ms (11% of total)
ival-sqrt: 4.0ms (11% of total)
ival-add: 2.0ms (5.5% of total)
const: 1.0ms (2.8% 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)

simplify10.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)

localize84.0ms (0.8%)

Localize:

Found 8 expressions of interest:

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

Compiled 104 to 16 computations (84.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 23.0ms
ival-mult: 9.0ms (39.3% of total)
ival-cos: 6.0ms (26.2% of total)
ival-div: 3.0ms (13.1% of total)
ival-add: 2.0ms (8.7% of total)
ival-sqrt: 2.0ms (8.7% 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
@inf
(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
2.0ms
th
@-inf
(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
2.0ms
th
@-inf
(/ (cos th) (sqrt 2))
1.0ms
a1
@0
(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))
1.0ms
th
@0
(+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2)))

rewrite287.0ms (2.8%)

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)))

simplify230.0ms (2.2%)

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)))

eval90.0ms (0.9%)

Compiler

Compiled 21760 to 1298 computations (94% saved)

prune81.0ms (0.8%)

Pruning

12 alts after pruning (12 fresh and 0 done)

PrunedKeptTotal
New82112833
Fresh000
Picked202
Done000
Total82312835
Accuracy
100.0%
Counts
835 → 12
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶99.7%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
▶65.6%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
▶61.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 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
59.4%
(/.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.5%
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
26.2%
(/.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)))
▶99.5%
(/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
99.5%
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
▶99.6%
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
99.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.7%
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
99.6%
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 th))
Compiler

Compiled 438 to 300 computations (31.5% saved)

simplify181.0ms (1.8%)

Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

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

Useful iterations: 1 (0.0ms)

IterNodesCost
027208
165199
2172199
3666199
42110199
54809199
65262199
75680199
85757199
95803199
105856199
08368199
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th)))
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
a1
(* a2 a2)
a2
(/ (sqrt 2) (cos th))
(sqrt 2)
2
(cos th)
th
(/ (+ (* 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
(/ (* (cos th) (* a2 a2)) (sqrt 2))
(* (cos th) (* a2 a2))
(cos th)
th
(* a2 a2)
a2
(sqrt 2)
2
(/ (cos th) (/ (sqrt 2) (+ (* a1 a1) (* a2 a2))))
(cos th)
th
(/ (sqrt 2) (+ (* a1 a1) (* a2 a2)))
(sqrt 2)
2
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
a1
(* a2 a2)
a2
Outputs
(/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th)))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(+ (* a1 a1) (* a2 a2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(* a1 a1)
(*.f64 a1 a1)
a1
(* a2 a2)
(*.f64 a2 a2)
a2
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(cos th)
(cos.f64 th)
th
(/ (+ (* a1 a1) (* a2 a2)) (sqrt 2))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 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
(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 #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 a2 a2) (*.f64 a1 a1))))
(* (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24))))) (+ (* a1 a1) (* a2 a2)))
(*.f64 (+.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)))))))
(+ 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)
(+ (* a1 a1) (* a2 a2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(* a1 a1)
(*.f64 a1 a1)
a1
(* a2 a2)
(*.f64 a2 a2)
a2
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(/ (* (cos th) (* a2 a2)) (sqrt 2))
(/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(* (cos th) (* a2 a2))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(cos th)
(cos.f64 th)
th
(* a2 a2)
(*.f64 a2 a2)
a2
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(/ (cos th) (/ (sqrt 2) (+ (* a1 a1) (* a2 a2))))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(cos th)
(cos.f64 th)
th
(/ (sqrt 2) (+ (* a1 a1) (* a2 a2)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 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

localize185.0ms (1.8%)

Localize:

Found 20 expressions of interest:

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

Compiled 255 to 28 computations (89% saved)

Precisions
Click to see histograms. Total time spent on operations: 43.0ms
ival-mult: 14.0ms (32.7% of total)
ival-div: 10.0ms (23.4% of total)
ival-cos: 7.0ms (16.4% of total)
...c/correct-round.rkt:119:19: 4.0ms (9.3% of total)
ival-add: 4.0ms (9.3% of total)
ival-sqrt: 2.0ms (4.7% of total)
const: 1.0ms (2.3% of total)
backward-pass: 0.0ms (0% of total)

series26.0ms (0.2%)

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

90 calls:

TimeVariablePointExpression
6.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))
1.0ms
a1
@inf
(/ (* (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24))))) (+ (* a1 a1) (* a2 a2))) (sqrt 2))
1.0ms
a2
@inf
(/ (* (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24))))) (+ (* a1 a1) (* a2 a2))) (sqrt 2))

rewrite361.0ms (3.5%)

Algorithm
1×batch-egg-rewrite
Rules
3852×*-lowering-*.f32
3852×*-lowering-*.f64
3422×/-lowering-/.f32
3422×/-lowering-/.f64
1900×+-lowering-+.f64
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
027138
1145130
21205130
08447130
Stop Event
1×iter limit
1×node limit
Counts
18 → 959
Calls
Call 1
Inputs
(/ (+ (* a1 a1) (* a2 a2)) (/ (sqrt 2) (cos th)))
(+ (* a1 a1) (* a2 a2))
(* a1 a1)
(* a2 a2)
(/ (+ (* a1 a1) (* a2 a2)) (sqrt 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)))))
(* th (* th (+ -1/2 (* (* th th) 1/24))))
(/ (* (cos th) (* a2 a2)) (sqrt 2))
(* (cos th) (* a2 a2))
(cos th)
(/ (cos th) (/ (sqrt 2) (+ (* a1 a1) (* a2 a2))))
(/ (sqrt 2) (+ (* a1 a1) (* a2 a2)))
(sqrt 2)
(/ (sqrt 2) (cos th))
(* (* th th) 1/24)
(* th (+ -1/2 (* (* th th) 1/24)))
Outputs
(+.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(+.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(+.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 th) (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 a1 a1))))
(+.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(+.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(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 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 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 a2 (*.f64 a2 (-.f64 #s(literal 0 binary64) (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 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (*.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)))))
(fma.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (*.f64 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 (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 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (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 a2 (*.f64 a2 (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (/.f64 (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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(neg.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))))
(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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(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 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.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 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.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 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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.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 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (/.f64 (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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (/.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 (*.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) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.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 #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 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (/.f64 (-.f64 (*.f64 a1 (*.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 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))) (-.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 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 (*.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 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (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 (neg.f64 (+.f64 a1 a2)) (-.f64 a1 a2)))
(/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.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 (neg.f64 (+.f64 a1 a2)) (-.f64 a1 a2)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (-.f64 (*.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (*.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 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))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (-.f64 (*.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (*.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (*.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (-.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.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 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 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 a1 a1)))) (-.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (*.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (-.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(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 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.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))) (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 th)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #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 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (cos.f64 th) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (*.f64 (/.f64 (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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.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 a1 a1) (*.f64 a2 a2)) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #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 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(*.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (cos.f64 th) (/.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 (*.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 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.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 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.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) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 #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 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (cos.f64 th) (/.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 #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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (neg.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 0 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (-.f64 #s(literal 0 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 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a1 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)))
(*.f64 (/.f64 (-.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (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 a1 a1) (*.f64 a2 a2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(+.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(+.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(-.f64 #s(literal 0 binary64) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)) (/.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)))
(-.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(fma.f64 a1 a1 (*.f64 a2 a2))
(fma.f64 a2 a2 (*.f64 a1 a1))
(neg.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64))
(/.f64 #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 a2) (*.f64 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 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 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))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a1 (*.f64 a1 (*.f64 a2 a2))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (neg.f64 (*.f64 (neg.f64 (+.f64 a1 a2)) (-.f64 a1 a2))))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.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 (neg.f64 (+.f64 a1 a2)) (-.f64 a1 a2)))
(/.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (neg.f64 (+.f64 a1 a2)) (-.f64 a1 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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.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 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (+.f64 a1 a2)) (-.f64 a1 a2))))
(*.f64 (-.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 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)))
(+.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 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(+.f64 (*.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (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 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64))
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (+.f64 a1 a2)) (-.f64 a1 a2)))
(pow.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64))
(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))) #s(literal 1 binary64))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (neg.f64 (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 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (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 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(*.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 #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 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.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 (*.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 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1/2 binary64)))
(+.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))
(+.f64 (/.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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(+.f64 (/.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 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(+.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))
(+.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))
(+.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(-.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(neg.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(neg.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) #s(literal -1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))) (neg.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))) (neg.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (/.f64 (sqrt.f64 #s(literal 2 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (/.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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (-.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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (+.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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (pow.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 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) #s(literal -1 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (/.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 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))
(+.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(+.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(+.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))
(+.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(+.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))
(-.f64 #s(literal 0 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(-.f64 (/.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (-.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (/.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (-.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))
(fma.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(fma.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(fma.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))
(fma.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))
(fma.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(fma.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 a1 a1) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(fma.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 a2 a2) (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))
(fma.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) a2) a2 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))
(fma.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) a1) a1 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 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 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (-.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 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 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 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 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (-.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (-.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 a2 a2)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 a2 a2)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 a1 a1)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 a1 a1)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 a1 a1)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 a2 a2)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 a1 a1)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 a2 a2)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 a1 a1)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 a1 a1)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 a1 a1)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 a1 a1)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 a2 a2)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 a1 a1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 a1 a1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 a2 a2)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 a1 a1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 a2 a2)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 a1 a1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 a2 a2)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 a2 a2)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 a1 a1)))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))) (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (neg.f64 (*.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 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 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))) (neg.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (-.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (neg.f64 (-.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (neg.f64 (+.f64 a1 a2)) (-.f64 a1 a2)))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (neg.f64 (+.f64 a1 a2)) (-.f64 a1 a2)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (-.f64 (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (-.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (-.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (-.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) #s(literal 1 binary64))
(*.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 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))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 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 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 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 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))))
(*.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (-.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))
(*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) #s(literal -1 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 a1 a2)))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))
(+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal 1 binary64))
(+.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (neg.f64 (/.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (/.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(-.f64 (/.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))
(fma.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal 1 binary64))
(fma.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))) #s(literal 1 binary64))
(fma.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))) (*.f64 th th) #s(literal 1 binary64))
(fma.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) th #s(literal 1 binary64))
(fma.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal 1 binary64) #s(literal 1 binary64))
(neg.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)) (+.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) #s(literal -1 binary64))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (+.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))
(/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (neg.f64 (+.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) #s(literal -1 binary64)) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (neg.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))))) (neg.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))
(/.f64 (neg.f64 (+.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) #s(literal -1 binary64))) (neg.f64 (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (+.f64 (*.f64 (/.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (/.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (/.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))))
(/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (*.f64 (/.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (/.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (+.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (/.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) #s(literal 1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))))))
(*.f64 (+.f64 (*.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) #s(literal -1 binary64))))
(+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (*.f64 th (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64)))))
(+.f64 (*.f64 th (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64)))) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))
(+.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))
(+.f64 (*.f64 (*.f64 th th) (*.f64 th (*.f64 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 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64))) th))
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) (*.f64 th th)))
(+.f64 (*.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) (*.f64 th th)) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 th (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64))))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 th #s(literal -1/2 binary64)) th)) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64))) th)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) (*.f64 th th))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) (*.f64 th th))) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))
(fma.f64 th (*.f64 th #s(literal -1/2 binary64)) (*.f64 th (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64)))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) (*.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) (*.f64 th th)))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))
(fma.f64 (*.f64 th th) (*.f64 th (*.f64 th #s(literal 1/24 binary64))) (*.f64 (*.f64 th th) #s(literal -1/2 binary64)))
(fma.f64 (*.f64 th (*.f64 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 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64))) th))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) (+.f64 (*.f64 th (*.f64 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 th th) (*.f64 (*.f64 th th) #s(literal 1/576 binary64)))))))
(/.f64 (*.f64 th th) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (*.f64 th th) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) (*.f64 (*.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 (neg.f64 (*.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) #s(literal 1/2 binary64)))) #s(literal -1/4 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 th th) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) (*.f64 (*.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 th #s(literal -1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 th (*.f64 (*.f64 th th) (*.f64 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 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64)))) (*.f64 th (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (*.f64 th (*.f64 (*.f64 th th) (*.f64 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 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) (*.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 th th) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 th (*.f64 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 th (*.f64 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 (*.f64 th th) (*.f64 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 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64))) th) (*.f64 (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64))) th)) (*.f64 (*.f64 (*.f64 th #s(literal -1/2 binary64)) th) (*.f64 (*.f64 (*.f64 th th) (*.f64 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 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))) (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) (*.f64 th th))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) (*.f64 th th))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))) (*.f64 th th)) (*.f64 (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))) (*.f64 th th)) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))))
(/.f64 (-.f64 (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (*.f64 (*.f64 th (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64)))) (*.f64 th (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (*.f64 th (*.f64 (*.f64 th th) (*.f64 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 th (*.f64 th #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))) (-.f64 (*.f64 (*.f64 th th) #s(literal -1/2 binary64)) (*.f64 (*.f64 th th) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) #s(literal -1/2 binary64))))
(/.f64 (-.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 th) (*.f64 th #s(literal 1/24 binary64))) th) (*.f64 (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64))) th))) (-.f64 (*.f64 (*.f64 th #s(literal -1/2 binary64)) th) (*.f64 (*.f64 (*.f64 th th) (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))) (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) (*.f64 th th)))) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) (*.f64 th th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) (*.f64 th th)) (*.f64 (*.f64 th (*.f64 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 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))
(*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))
(*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))) (*.f64 th th))
(*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))) th)
(*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) #s(literal 1/2 binary64))))))
(*.f64 (*.f64 (*.f64 th th) (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) (*.f64 (*.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 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 a2 (*.f64 a2 (-.f64 #s(literal 0 binary64) (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 a2 (*.f64 a2 (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (*.f64 a2 (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2))))
(/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2)))
(/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 a2 (*.f64 a2 (-.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)) (*.f64 a2 (*.f64 a2 (-.f64 #s(literal 0 binary64) (cos.f64 th))))))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2)) #s(literal -1 binary64))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 a2 (*.f64 a2 (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (cos.f64 th))) #s(literal -1 binary64)))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a2 (*.f64 a2 (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 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 a2 (cos.f64 th)) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) a2) (sqrt.f64 #s(literal 2 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 a2 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 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 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 a2 (-.f64 #s(literal 0 binary64) (cos.f64 th))) #s(literal -1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(neg.f64 (*.f64 a2 (*.f64 a2 (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(*.f64 (*.f64 a2 a2) (cos.f64 th))
(*.f64 (cos.f64 th) (*.f64 a2 a2))
(*.f64 (cos.f64 th) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (cos.f64 th)))
(*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(*.f64 (*.f64 a2 (cos.f64 th)) a2)
(*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 (-.f64 #s(literal 0 binary64) a2)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 #s(literal -1 binary64) (*.f64 a2 (*.f64 a2 (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(*.f64 (*.f64 a2 (-.f64 #s(literal 0 binary64) (cos.f64 th))) (-.f64 #s(literal 0 binary64) a2))
(*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (cos.f64 th))
(*.f64 (neg.f64 (*.f64 a2 (-.f64 #s(literal 0 binary64) (cos.f64 th)))) a2)
(cos.f64 th)
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(/.f64 (cos.f64 th) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal -1 binary64))
(*.f64 (cos.f64 th) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 th))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(+.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(+.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(+.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 (cos.f64 th) (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 a1 a1))))
(+.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))))
(+.f64 (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1))) (*.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))))
(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 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 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 a2 (*.f64 a2 (-.f64 #s(literal 0 binary64) (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 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(-.f64 (/.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 (*.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)))))
(fma.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (*.f64 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 (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 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (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 a2 (*.f64 a2 (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1) (*.f64 (/.f64 (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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(fma.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(neg.f64 (*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))))
(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 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(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 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.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 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(/.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 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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.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 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (/.f64 (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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (/.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 (*.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) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (neg.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.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 #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 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (/.f64 (-.f64 (*.f64 a1 (*.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 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))) (-.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 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 (*.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 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (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 (neg.f64 (+.f64 a1 a2)) (-.f64 a1 a2)))
(/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.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 (neg.f64 (+.f64 a1 a2)) (-.f64 a1 a2)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (-.f64 (*.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (*.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 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))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (-.f64 (*.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (*.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (*.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (-.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.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 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 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 a1 a1)))) (-.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (*.f64 (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (-.f64 (/.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(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 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.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))) (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (cos.f64 th)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #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 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th)))))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.f64 (*.f64 (cos.f64 th) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (cos.f64 th) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (cos.f64 th) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (*.f64 (/.f64 (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 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.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 a1 a1) (*.f64 a2 a2)) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #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 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(*.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (pow.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (cos.f64 th) (/.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 (*.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 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.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 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.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) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 #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 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (cos.f64 th) (/.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 #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 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (neg.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 0 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (-.f64 #s(literal 0 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 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (cos.f64 th) #s(literal -1 binary64)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 a1 a2)) (/.f64 (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))) (-.f64 a1 a2)))
(*.f64 (/.f64 (-.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 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))) (/.f64 (cos.f64 th) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (/.f64 (cos.f64 th) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (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 (sqrt.f64 #s(literal 2 binary64)) (+.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 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a2 a2))))
(+.f64 (*.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 a1 (*.f64 a1 (*.f64 a1 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)))))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(+.f64 (*.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 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 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)))))) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))))
(+.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (*.f64 a1 a1)) (*.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 0 binary64) (*.f64 a2 a2))))
(exp.f64 (*.f64 (log.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) #s(literal 1 binary64)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.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 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1)))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))) #s(literal -1 binary64))
(/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(/.f64 #s(literal -1 binary64) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(pow.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.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 (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 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 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 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (*.f64 a1 a1))))
(*.f64 (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (pow.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) #s(literal -1 binary64)))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(*.f64 (/.f64 (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 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))))
(*.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 (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 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/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 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 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 (/.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 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (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 (pow.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.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 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(neg.f64 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) #s(literal 1 binary64)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))
(pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (cos.f64 th))))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(*.f64 (pow.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(*.f64 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 th #s(literal -1/2 binary64)) (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64))))
(+.f64 (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64))) (*.f64 th #s(literal -1/2 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 th #s(literal -1/2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64)))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 th #s(literal -1/2 binary64))))
(-.f64 (/.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) (+.f64 (*.f64 th #s(literal -1/2 binary64)) (*.f64 #s(literal -1/24 binary64) (*.f64 th (*.f64 th th))))) (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/576 binary64)))) (+.f64 (*.f64 th #s(literal -1/2 binary64)) (*.f64 #s(literal -1/24 binary64) (*.f64 th (*.f64 th th))))))
(fma.f64 th #s(literal -1/2 binary64) (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64))))
(fma.f64 th (*.f64 th (*.f64 th #s(literal 1/24 binary64))) (*.f64 th #s(literal -1/2 binary64)))
(fma.f64 #s(literal -1/2 binary64) th (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64))))
(fma.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64)) (*.f64 th #s(literal -1/2 binary64)))
(fma.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th th)) (*.f64 th #s(literal -1/2 binary64)))
(fma.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) th (*.f64 th #s(literal -1/2 binary64)))
(fma.f64 (*.f64 th #s(literal 1/24 binary64)) (*.f64 th th) (*.f64 th #s(literal -1/2 binary64)))
(fma.f64 (*.f64 th (*.f64 th th)) #s(literal 1/24 binary64) (*.f64 th #s(literal -1/2 binary64)))
(/.f64 th (/.f64 #s(literal 1 binary64) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) (-.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/576 binary64)))) (*.f64 (*.f64 th #s(literal -1/2 binary64)) (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64)))))) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))) (*.f64 (*.f64 (*.f64 th (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th th)) #s(literal 1/13824 binary64))) (*.f64 th (*.f64 th th))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 th #s(literal -1/2 binary64)) (*.f64 #s(literal -1/24 binary64) (*.f64 th (*.f64 th th)))) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/576 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) #s(literal 1/2 binary64)))) (*.f64 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 th (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/576 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) #s(literal 1/2 binary64)))) (*.f64 (+.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th th)) #s(literal 1/13824 binary64)))) th)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal -1/24 binary64))) (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/576 binary64)))) th)))
(/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))) (*.f64 (*.f64 (*.f64 th (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th th)) #s(literal 1/13824 binary64))) (*.f64 th (*.f64 th th)))) (+.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) (-.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/576 binary64)))) (*.f64 (*.f64 th #s(literal -1/2 binary64)) (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/576 binary64))))) (+.f64 (*.f64 th #s(literal -1/2 binary64)) (*.f64 #s(literal -1/24 binary64) (*.f64 th (*.f64 th th)))))
(/.f64 (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 th (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/576 binary64))))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal -1/24 binary64))))
(/.f64 (*.f64 (+.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th th)) #s(literal 1/13824 binary64)))) th) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/576 binary64)))) th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal -1/24 binary64))))
(/.f64 (neg.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))) (*.f64 (*.f64 (*.f64 th (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th th)) #s(literal 1/13824 binary64))) (*.f64 th (*.f64 th th))))) (neg.f64 (+.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) (-.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/576 binary64)))) (*.f64 (*.f64 th #s(literal -1/2 binary64)) (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/576 binary64)))))) (neg.f64 (+.f64 (*.f64 th #s(literal -1/2 binary64)) (*.f64 #s(literal -1/24 binary64) (*.f64 th (*.f64 th th))))))
(/.f64 (neg.f64 (*.f64 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 (neg.f64 (*.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) #s(literal 1/2 binary64)))) #s(literal -1/4 binary64)))
(/.f64 (neg.f64 (*.f64 th (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) (*.f64 (*.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 (neg.f64 (*.f64 (+.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th th)) #s(literal 1/13824 binary64)))) th)) (+.f64 (neg.f64 (*.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) #s(literal 1/2 binary64)))) #s(literal -1/4 binary64)))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/576 binary64)))) th)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal -1/24 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 th (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th th)) #s(literal 1/13824 binary64))) (*.f64 th (*.f64 th th))) (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th)))) (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/576 binary64)))) (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) (*.f64 (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64))) (*.f64 th #s(literal -1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/576 binary64)))) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (-.f64 (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64))) (*.f64 th #s(literal -1/2 binary64))))
(*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))
(*.f64 #s(literal 1 binary64) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))
(*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64)))) th)
(*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 th (*.f64 th th))) (*.f64 (*.f64 (*.f64 th (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th th)) #s(literal 1/13824 binary64))) (*.f64 th (*.f64 th th)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) (-.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/576 binary64)))) (*.f64 (*.f64 th #s(literal -1/2 binary64)) (*.f64 (*.f64 th th) (*.f64 th #s(literal 1/24 binary64))))))))
(*.f64 (-.f64 (*.f64 (*.f64 th th) #s(literal 1/4 binary64)) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/576 binary64))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 th #s(literal -1/2 binary64)) (*.f64 #s(literal -1/24 binary64) (*.f64 th (*.f64 th th))))))
(*.f64 (*.f64 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 th (*.f64 th #s(literal 1/24 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) #s(literal 1/2 binary64))))))
(*.f64 (*.f64 th (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) (*.f64 (*.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)))))
(*.f64 (*.f64 (+.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th (*.f64 th th)) (*.f64 (*.f64 th (*.f64 th th)) #s(literal 1/13824 binary64)))) th) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal 1/24 binary64))) #s(literal 1/2 binary64))))))
(*.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/576 binary64)))) th) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal -1/24 binary64)))))

simplify296.0ms (2.9%)

Algorithm
1×egg-herbie
Rules
4888×*-lowering-*.f32
4888×*-lowering-*.f64
3592×+-lowering-+.f64
3592×+-lowering-+.f32
1218×times-frac
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
02925866
19694648
236684338
082624338
Stop Event
1×iter limit
1×node limit
Counts
360 → 360
Calls
Call 1
Inputs
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (* (pow a1 2) (sqrt 2)))))
(/ (* (pow a1 2) (cos th)) (sqrt 2))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(+ (/ (* (pow a1 2) (cos th)) (sqrt 2)) (/ (* (pow a2 2) (cos th)) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (pow a1 2) (cos th)) (* (pow a2 2) (sqrt 2)))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(+ (* -1/2 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* 1/24 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(+ (* (pow th 2) (+ (* -1/2 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow th 2) (+ (pow a1 2) (pow a2 2))) (sqrt 2))) (* 1/24 (/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))))))) (+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(pow a2 2)
(+ (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 a2 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(/ (pow a1 2) (sqrt 2))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(/ (pow a2 2) (sqrt 2))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (/ (pow a1 2) (* (pow a2 2) (sqrt 2)))))
(/ (+ (pow a1 2) (pow 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) (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))
(pow a2 2)
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* 1/24 (* (pow a2 2) (pow th 2))))) (pow a2 2))
(+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* (pow th 2) (+ (* -1/720 (* (pow a2 2) (pow th 2))) (* 1/24 (pow a2 2)))))) (pow a2 2))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (cos th))
(* (pow a2 2) (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))
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)))))
(/ (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))
(sqrt 2)
(+ (sqrt 2) (* 1/2 (* (pow th 2) (sqrt 2))))
(+ (sqrt 2) (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2)))))
(+ (sqrt 2) (* (pow th 2) (- (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/720 (sqrt 2)) (+ (* 1/48 (sqrt 2)) (* 1/2 (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2)))))))) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2)))))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(* 1/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/2 th)
(* th (- (* 1/24 (pow th 2)) 1/2))
(* th (- (* 1/24 (pow th 2)) 1/2))
(* th (- (* 1/24 (pow th 2)) 1/2))
(* 1/24 (pow th 3))
(* (pow th 3) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(* (pow th 3) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(* (pow th 3) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(* 1/24 (pow th 3))
(* -1 (* (pow th 3) (- (* 1/2 (/ 1 (pow th 2))) 1/24)))
(* -1 (* (pow th 3) (- (* 1/2 (/ 1 (pow th 2))) 1/24)))
(* -1 (* (pow th 3) (- (* 1/2 (/ 1 (pow th 2))) 1/24)))
Outputs
(/ (* (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 a2 a2) (*.f64 a1 a1)))
(+ (/ (* (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 a2 a2) (*.f64 a1 a1)))
(+ (/ (* (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 a2 a2) (*.f64 a1 a1)))
(/ (* (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 a2 a2) (*.f64 a1 a1)))
(+ (/ (* (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 a2 a2) (*.f64 a1 a1)))
(+ (/ (* (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 a2 a2) (*.f64 a1 a1)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (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))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (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 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 th th) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal -1/2 binary64) (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 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 th th) (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (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 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 th th) (+.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.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)))))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(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)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(pow a2 2)
(*.f64 a2 a2)
(/ (pow a2 2) (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 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 (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 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
(* (pow a1 2) (+ (/ 1 (sqrt 2)) (/ (pow a2 2) (* (pow a1 2) (sqrt 2)))))
(*.f64 (*.f64 a1 a1) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(+ (/ (pow a1 2) (sqrt 2)) (/ (pow a2 2) (sqrt 2)))
(*.f64 (/.f64 #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)))))))
(/ (+ (pow a1 2) (pow a2 2)) (sqrt 2))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (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 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 th th) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal -1/2 binary64) (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 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 th th) (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (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 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 th th) (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (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 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal 1/24 binary64)) (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)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (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 a2 a2) (*.f64 a1 a1)) (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 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 th th) (*.f64 th th)))) (/.f64 (*.f64 a2 a2) (*.f64 (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 a2 a2) (*.f64 a1 a1)) (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 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 th th) (*.f64 th th)))) (/.f64 (*.f64 a2 a2) (*.f64 (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 (*.f64 a2 a2) (*.f64 a1 a1)) #s(literal 1/24 binary64)) (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)))))
(*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (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 a2 a2) (*.f64 a1 a1)) (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 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 th th) (*.f64 th th)))) (/.f64 (*.f64 a2 a2) (*.f64 (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 a2 a2) (*.f64 a1 a1)) (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 a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 th th) (*.f64 th th)))) (/.f64 (*.f64 a2 a2) (*.f64 (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 (*.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)))))))) (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 (*.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)))))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 (*.f64 th th) (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 (*.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)))))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 (*.f64 th th) (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 (*.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)))))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (*.f64 a1 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64))))))))
(/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 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)))))) (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 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.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)))))) (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 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.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)))))) (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 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.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)))))) (sqrt.f64 #s(literal 2 binary64)))))))
(/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 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)))))) (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 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.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)))))) (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 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.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)))))) (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 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.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)))))) (sqrt.f64 #s(literal 2 binary64)))))))
(/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 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)))))) (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 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)))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 (*.f64 th th) (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 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)))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 (*.f64 th th) (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 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)))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 (*.f64 th th) (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 (*.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)))))))) (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 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.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)))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.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)))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.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)))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/.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)))))))) (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 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.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)))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.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)))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(* (pow a2 2) (+ (/ 1 (sqrt 2)) (+ (/ (* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (* (pow a2 2) (sqrt 2))) (/ (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)) (sqrt 2)))))
(*.f64 (*.f64 a2 a2) (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (/.f64 (*.f64 th th) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.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)))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 a2))))
(+ (pow a1 2) (pow a2 2))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+ (* -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 a2 a2) (*.f64 a1 a1)))
(+ (* (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 a2 a2) (*.f64 a1 a1)) (+.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))) (* 1/24 (* (pow th 2) (+ (pow a1 2) (pow a2 2)))))) (+ (pow a1 2) (pow a2 2)))
(*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (+.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)))))
(* 1/24 (* (pow th 4) (+ (pow a1 2) (pow a2 2))))
(*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (*.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 a2 a2) (*.f64 a1 a1)) (+.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 a2 a2) (*.f64 a1 a1)) (+.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 a2 a2) (*.f64 a1 a1)) (+.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 a2 a2) (*.f64 a1 a1)) (*.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 a2 a2) (*.f64 a1 a1)) (+.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 a2 a2) (*.f64 a1 a1)) (+.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 a2 a2) (*.f64 a1 a1)) (+.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 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))))))))
(+ (* (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 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)))))))
(+ (* (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 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)))))))
(+ (* (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 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)))))))
(* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.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))))))))
(* (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 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 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 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 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 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 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 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 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 a1)))))
(* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.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))))))))
(* (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 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 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 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 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 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 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 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 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 a1)))))
(* (pow a1 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.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))))))))
(+ (* (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 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)))))))
(+ (* (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 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)))))))
(+ (* (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 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)))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.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))))))))
(* (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 #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 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 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 #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 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 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 #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 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 a2 a2))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.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))))))))
(* (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 #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 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 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 #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 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 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 #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 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 a2 a2))))))
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) (- (* 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 th (*.f64 th #s(literal -1/2 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)))))
(* (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) (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 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 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 th th) (*.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64))))))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (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)
(*.f64 a2 a2)
(+ (* -1/2 (* (pow a2 2) (pow th 2))) (pow a2 2))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))
(+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* 1/24 (* (pow a2 2) (pow th 2))))) (pow a2 2))
(*.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))))))))
(+ (* (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 a2 (*.f64 a2 (*.f64 th th))) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 th th) #s(literal -1/720 binary64)))))))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (cos th))
(*.f64 a2 (*.f64 a2 (cos.f64 th)))
(* (pow a2 2) (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)))
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 (*.f64 th 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 a2 a2) (*.f64 a1 a1)) (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 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 th th) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal -1/2 binary64) (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 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 th th) (*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (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 a2 a2) (*.f64 a1 a1))) (*.f64 (*.f64 th th) (+.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.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)))))))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (cos th) (+ (pow a1 2) (pow a2 2))) (sqrt 2))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (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 a2 a2) (*.f64 a1 a1)))
(+ (/ (* (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 a2 a2) (*.f64 a1 a1)))
(+ (/ (* (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 a2 a2) (*.f64 a1 a1)))
(/ (* (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 a2 a2) (*.f64 a1 a1)))
(+ (/ (* (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 a2 a2) (*.f64 a1 a1)))
(+ (/ (* (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 a2 a2) (*.f64 a1 a1)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow a2 2) (+ (/ (cos th) (sqrt 2)) (/ (* (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))))
(/ (sqrt 2) (pow a2 2))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 6 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))))
(+ (* (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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 (*.f64 a1 (-.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 6 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (pow.f64 a2 #s(literal 8 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 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) 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 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (/.f64 (*.f64 a2 a2) (*.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 (-.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (/.f64 (*.f64 a2 a2) (*.f64 a1 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 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) 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 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (/.f64 (*.f64 a2 a2) (*.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 (-.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (pow.f64 a2 #s(literal 6 binary64)) (pow.f64 a1 #s(literal 6 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.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 (*.f64 a2 (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) 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 (*.f64 a2 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 (*.f64 a1 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 a2 (*.f64 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 (*.f64 a1 a1) (*.f64 a1 a1)))))))
(/ (sqrt 2) (pow a2 2))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 a2 a2))
(/ (- (+ (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 (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 a2 a2))
(/ (sqrt 2) (pow a2 2))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (*.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 a2 a2))
(/ (- (+ (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 (-.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 6 binary64))) (pow.f64 a2 #s(literal 6 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 a2 a2))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
(+ (sqrt 2) (* 1/2 (* (pow th 2) (sqrt 2))))
(*.f64 (+.f64 (*.f64 (*.f64 th th) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(+ (sqrt 2) (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2)))))
(+.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -5/24 binary64) (*.f64 th th)) #s(literal -1/2 binary64))) (*.f64 th th))))
(+ (sqrt 2) (* (pow th 2) (- (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/720 (sqrt 2)) (+ (* 1/48 (sqrt 2)) (* 1/2 (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2)))))))) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2)))))
(+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 th th) (+.f64 (*.f64 (*.f64 th th) (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5/24 binary64)) (*.f64 (*.f64 th th) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -61/720 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(* 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/2 th)
(*.f64 th #s(literal -1/2 binary64))
(* th (- (* 1/24 (pow th 2)) 1/2))
(*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))
(* th (- (* 1/24 (pow th 2)) 1/2))
(*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))
(* th (- (* 1/24 (pow th 2)) 1/2))
(*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))
(* 1/24 (pow th 3))
(*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))
(* (pow th 3) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 th th) (*.f64 th (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(* (pow th 3) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 th th) (*.f64 th (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(* (pow th 3) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 th th) (*.f64 th (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(* 1/24 (pow th 3))
(*.f64 th (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))
(* -1 (* (pow th 3) (- (* 1/2 (/ 1 (pow th 2))) 1/24)))
(*.f64 (*.f64 th th) (*.f64 th (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(* -1 (* (pow th 3) (- (* 1/2 (/ 1 (pow th 2))) 1/24)))
(*.f64 (*.f64 th th) (*.f64 th (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(* -1 (* (pow th 3) (- (* 1/2 (/ 1 (pow th 2))) 1/24)))
(*.f64 (*.f64 th th) (*.f64 th (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))))

eval217.0ms (2.1%)

Compiler

Compiled 57691 to 3105 computations (94.6% saved)

prune264.0ms (2.6%)

Pruning

29 alts after pruning (26 fresh and 3 done)

PrunedKeptTotal
New1748261774
Fresh707
Picked235
Done000
Total1757291786
Accuracy
100.0%
Counts
1786 → 29
Alt Table
Click to see full alt table
StatusAccuracyProgram
65.6%
(/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
11.1%
(/.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)))
8.7%
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
65.6%
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
11.1%
(/.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))))
59.4%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))))
✓99.7%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
56.6%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 (+.f64 (*.f64 (*.f64 th th) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
✓65.6%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
59.3%
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
99.5%
(/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64)))
32.1%
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))
99.4%
(/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
✓99.5%
(/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
▶60.7%
(/.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)))))))) (sqrt.f64 #s(literal 2 binary64)))
▶99.5%
(/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
65.6%
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
▶13.8%
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
99.4%
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
8.7%
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
65.6%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
65.5%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
99.4%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))
99.5%
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
65.6%
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
11.2%
(*.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)))))
▶59.3%
(*.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))))
99.4%
(*.f64 (*.f64 a2 (*.f64 a2 (-.f64 #s(literal 0 binary64) (cos.f64 th)))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
▶99.4%
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
Compiler

Compiled 1053 to 673 computations (36.1% saved)

simplify190.0ms (1.8%)

Algorithm
1×egg-herbie
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(cos.f64 th)
✓cost-diff0
(*.f64 a2 (cos.f64 th))
✓cost-diff0
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 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 (*.f64 th th) #s(literal 1/24 binary64))))))
✓cost-diff0
(*.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)))))))
✓cost-diff0
(*.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))))))))
✓cost-diff0
(/.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)))))))) (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(*.f64 th #s(literal -1/2 binary64))
✓cost-diff0
(*.f64 th (*.f64 th #s(literal -1/2 binary64)))
✓cost-diff0
(+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))
✓cost-diff0
(*.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))))
✓cost-diff0
(sqrt.f64 #s(literal 2 binary64))
✓cost-diff0
(*.f64 a1 a1)
✓cost-diff0
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(sqrt.f64 #s(literal 2 binary64))
✓cost-diff0
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
✓cost-diff0
(*.f64 a2 a2)
✓cost-diff0
(/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
Rules
4194×*-lowering-*.f32
4194×*-lowering-*.f64
1638×distribute-lft-in
1538×distribute-rgt-in
1414×fma-define
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
031187
180174
2196174
3557174
41559174
52888174
63784174
74718174
85564174
96718174
107256174
117672174
127785174
08141174
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(/ (* a2 a2) (/ (sqrt 2) (cos th)))
(* a2 a2)
a2
(/ (sqrt 2) (cos th))
(sqrt 2)
2
(cos th)
th
(/ (* a1 a1) (sqrt 2))
(* a1 a1)
a1
(sqrt 2)
2
(* (+ 1 (* th (* th -1/2))) (/ (* a2 a2) (sqrt 2)))
(+ 1 (* th (* th -1/2)))
1
(* th (* th -1/2))
th
(* th -1/2)
-1/2
(/ (* a2 a2) (sqrt 2))
(* a2 a2)
a2
(sqrt 2)
2
(/ (* a2 (* a2 (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24))))))) (sqrt 2))
(* a2 (* a2 (+ 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)))))
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
(sqrt 2)
2
(* (* a2 (cos th)) (/ a2 (sqrt 2)))
(* a2 (cos th))
a2
(cos th)
th
(/ a2 (sqrt 2))
(sqrt 2)
2
Outputs
(/ (* a2 a2) (/ (sqrt 2) (cos th)))
(/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(* a2 a2)
(*.f64 a2 a2)
a2
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(cos th)
(cos.f64 th)
th
(/ (* a1 a1) (sqrt 2))
(*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(* a1 a1)
(*.f64 a1 a1)
a1
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(* (+ 1 (* th (* th -1/2))) (/ (* a2 a2) (sqrt 2)))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(+ 1 (* th (* th -1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))
1
#s(literal 1 binary64)
(* th (* th -1/2))
(*.f64 th (*.f64 th #s(literal -1/2 binary64)))
th
(* th -1/2)
(*.f64 th #s(literal -1/2 binary64))
-1/2
#s(literal -1/2 binary64)
(/ (* a2 a2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* a2 a2)
(*.f64 a2 a2)
a2
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(/ (* a2 (* a2 (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24))))))) (sqrt 2))
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(* a2 (* a2 (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24)))))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
a2
(* a2 (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24))))))
(*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24)))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
1
#s(literal 1 binary64)
(* th (* th (+ -1/2 (* (* th th) 1/24))))
(*.f64 (*.f64 th 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)
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(* (* a2 (cos th)) (/ a2 (sqrt 2)))
(/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(* a2 (cos th))
(*.f64 a2 (cos.f64 th))
a2
(cos th)
(cos.f64 th)
th
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)

localize205.0ms (2%)

Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓accuracy100.0%
(cos.f64 th)
✓accuracy99.8%
(*.f64 a2 (cos.f64 th))
✓accuracy99.8%
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
✓accuracy99.3%
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
✓accuracy99.8%
(/.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)))))))) (sqrt.f64 #s(literal 2 binary64)))
✓accuracy99.7%
(*.f64 (*.f64 th th) #s(literal 1/24 binary64))
✓accuracy99.2%
(*.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))))))))
✓accuracy98.9%
(*.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)))))))
✓accuracy100.0%
(*.f64 a2 a2)
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy99.7%
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
✓accuracy95.5%
(*.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))))
✓accuracy100.0%
(*.f64 a1 a1)
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy99.6%
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy100.0%
(cos.f64 th)
✓accuracy99.7%
(/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
✓accuracy99.6%
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
Results
151.0ms255×0valid
2.0ms1×3valid
Compiler

Compiled 218 to 32 computations (85.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 71.0ms
ival-cos: 26.0ms (36.7% of total)
ival-mult: 22.0ms (31.1% of total)
ival-div: 11.0ms (15.5% of total)
...c/correct-round.rkt:119:19: 4.0ms (5.6% of total)
ival-add: 4.0ms (5.6% of total)
ival-sqrt: 2.0ms (2.8% of total)
const: 1.0ms (1.4% of total)
backward-pass: 0.0ms (0% of total)

series17.0ms (0.2%)

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

78 calls:

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

rewrite318.0ms (3.1%)

Algorithm
1×batch-egg-rewrite
Rules
4026×*-lowering-*.f32
4026×*-lowering-*.f64
3430×/-lowering-/.f32
3430×/-lowering-/.f64
1254×+-lowering-+.f64
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
031131
1156121
21130121
08426121
Stop Event
1×iter limit
1×node limit
Counts
20 → 741
Calls
Call 1
Inputs
(/ (* a2 a2) (/ (sqrt 2) (cos th)))
(* a2 a2)
(/ (sqrt 2) (cos th))
(sqrt 2)
(/ (* a1 a1) (sqrt 2))
(* a1 a1)
(* (+ 1 (* th (* th -1/2))) (/ (* a2 a2) (sqrt 2)))
(+ 1 (* th (* th -1/2)))
(* th (* th -1/2))
(* th -1/2)
(/ (* a2 (* a2 (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24))))))) (sqrt 2))
(* a2 (* a2 (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24)))))))
(* a2 (+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24))))))
(+ 1 (* th (* th (+ -1/2 (* (* th th) 1/24)))))
(* (* a2 (cos th)) (/ a2 (sqrt 2)))
(* a2 (cos th))
(cos th)
(/ a2 (sqrt 2))
(/ (* a2 a2) (sqrt 2))
(* (* th th) 1/24)
Outputs
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 a2 a2) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(neg.f64 (/.f64 (*.f64 a2 a2) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(neg.f64 (*.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(neg.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))))
(neg.f64 (/.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 a2 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) a2))
(/.f64 a2 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.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 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 a2 (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th)))
(/.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (*.f64 a2 (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(/.f64 (neg.f64 (*.f64 a2 (cos.f64 th))) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (cos.f64 th))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) #s(literal -1 binary64))
(*.f64 a2 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (cos.f64 th))
(*.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 a2 (cos.f64 th)))
(*.f64 (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 (cos.f64 th))) #s(literal -1 binary64)))
(*.f64 (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) a2)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) a2)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 a2 a2)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 (cos.f64 th)) (/.f64 #s(literal 1 binary64) a2)))
(*.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a2 a2) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))) (/.f64 (-.f64 #s(literal 0 binary64) a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))) (/.f64 a2 (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
(*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (cos.f64 th)) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 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 a2 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (/.f64 (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64)) (*.f64 a2 (cos.f64 th)))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (*.f64 a2 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (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 a2 (cos.f64 th)) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64)))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(/.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal -1 binary64))
(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 (-.f64 #s(literal 0 binary64) a2) (-.f64 #s(literal 0 binary64) a2))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))
(*.f64 (exp.f64 (log.f64 a2)) (exp.f64 (log.f64 a2)))
(exp.f64 (*.f64 (log.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 th))) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(neg.f64 (/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 1 binary64)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 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)))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))
(pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(*.f64 (pow.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(*.f64 (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(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 (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 (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)))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal -1 binary64)))
(exp.f64 (-.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.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) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a1 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 a1) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)) (neg.f64 (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 a1))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a1 a1)) #s(literal -1 binary64)))
(*.f64 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a1 a1) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.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))))
(*.f64 (/.f64 (*.f64 a1 a1) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64)))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))
(neg.f64 (-.f64 #s(literal 0 binary64) (*.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 a1 (neg.f64 (-.f64 #s(literal 0 binary64) a1)))
(*.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 a1 a1))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a1 a1)))
(*.f64 (-.f64 #s(literal 0 binary64) a1) (-.f64 #s(literal 0 binary64) a1))
(*.f64 (exp.f64 (log.f64 a1)) (exp.f64 (log.f64 a1)))
(*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) a1)) a1)
(+.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))
(+.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(+.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(+.f64 (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(-.f64 (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 a2 (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 #s(literal 1 binary64) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 1 binary64) (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))
(fma.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(fma.f64 (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) a2 (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(fma.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2) (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(neg.f64 (*.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))))
(neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) a2) (*.f64 #s(literal -1 binary64) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))))
(neg.f64 (/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 a2 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))))
(/.f64 a2 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))))
(/.f64 (*.f64 a2 a2) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 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 #s(literal -1/2 binary64)))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))) (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))) (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))) (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(/.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/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 #s(literal -1/2 binary64))))))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 a2 a2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 a2 a2)) (*.f64 (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 a2 a2))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 a2 a2))) (*.f64 (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (*.f64 a2 a2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (*.f64 a2 a2))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))))) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))))
(/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2) (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))))
(/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (neg.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))))))
(/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64)))) (*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))))
(/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64)))) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))))
(/.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))))
(/.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))))
(/.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))))
(/.f64 (*.f64 a2 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))))))
(/.f64 (*.f64 a2 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 a2 (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) #s(literal -1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) #s(literal -1 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))
(/.f64 (*.f64 #s(literal -1 binary64) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))))) (*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))))))
(/.f64 (*.f64 #s(literal -1 binary64) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))))) (*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) #s(literal -1 binary64))) (*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) a2) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) a2) (*.f64 (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) #s(literal -1 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) #s(literal -1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) a2) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) #s(literal -1 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)))
(/.f64 (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) a2) (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (*.f64 a2 a2)) (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) #s(literal -1 binary64)) (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)))
(/.f64 (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64)))) a2) (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64)))) (*.f64 a2 a2)) (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64)))) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64)))) #s(literal -1 binary64)) (*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) #s(literal -1 binary64)) a2) (*.f64 (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) #s(literal -1 binary64)) (*.f64 a2 a2)) (*.f64 (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (*.f64 (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) #s(literal -1 binary64)) #s(literal -1 binary64)) (*.f64 (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))))))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.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 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) #s(literal -1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))
(/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 a2 a2)) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 a2 a2)) #s(literal -1 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (*.f64 a2 a2)) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (*.f64 a2 a2)) #s(literal -1 binary64)) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2))
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 a2 a2)))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (*.f64 a2 a2)))) (neg.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64)))))) (neg.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))))) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))))
(/.f64 (neg.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))))) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))))
(/.f64 (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (-.f64 (*.f64 (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))))
(/.f64 (+.f64 (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (-.f64 (*.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (-.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (*.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal 3 binary64)) (pow.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) (-.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (*.f64 (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))))
(/.f64 (-.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (*.f64 (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))) (-.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))) (*.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))) (-.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (-.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))) (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))) (-.f64 (/.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))) #s(literal -1 binary64))
(*.f64 a2 (*.f64 (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))))
(*.f64 (*.f64 a2 a2) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))))
(*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))))
(*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))))))
(*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))))
(*.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))))))
(*.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) a2) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))))
(*.f64 (*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 a2 a2))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 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 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) #s(literal -1 binary64)) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))
(+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64))
(+.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))))
(-.f64 (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))
(fma.f64 th (*.f64 th #s(literal -1/2 binary64)) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64))
(fma.f64 #s(literal -1/2 binary64) (*.f64 th th) #s(literal 1 binary64))
(fma.f64 (*.f64 th #s(literal -1/2 binary64)) th #s(literal 1 binary64))
(fma.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 (*.f64 th th) #s(literal -1/2 binary64) #s(literal 1 binary64))
(neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))))))
(neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))))
(neg.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))))
(neg.f64 (/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)) (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) #s(literal -1 binary64))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))))
(/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))))
(/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))))
(/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (neg.f64 (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64)))) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) #s(literal -1 binary64)) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (*.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/4 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))) (*.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))) #s(literal 1/64 binary64)))) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))) #s(literal 1/64 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))) #s(literal 1/64 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))) #s(literal 1/64 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (*.f64 (*.f64 th th) (*.f64 th th))) #s(literal 1/16 binary64)) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (*.f64 (*.f64 th th) (*.f64 th th))) #s(literal 1/16 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))))) (neg.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))))))
(/.f64 (neg.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))))) (neg.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) #s(literal -1 binary64))) (neg.f64 (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))))))
(/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))) (*.f64 (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))))) (+.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))) #s(literal 1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64))))))
(*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))))))
(*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 th (*.f64 th #s(literal 1/2 binary64)))))))
(*.f64 (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64))))
(*.f64 th (*.f64 th #s(literal -1/2 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(*.f64 (*.f64 th #s(literal -1/2 binary64)) th)
(*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal 1 binary64))
(*.f64 (*.f64 th th) #s(literal -1/2 binary64))
(*.f64 th #s(literal -1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 th #s(literal -1/2 binary64)))
(*.f64 #s(literal -1/2 binary64) th)
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 a2 a2) (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 th th))) #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 th th))) #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 th th))) #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 th th))) #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 th th))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 th th))) #s(literal -1 binary64)))))
(/.f64 (*.f64 (+.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a2 (*.f64 a2 a2)))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (-.f64 (*.f64 (*.f64 (*.f64 a2 (*.f64 th th)) (*.f64 a2 (*.f64 th th))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (*.f64 (+.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a2 (*.f64 a2 a2)))) #s(literal -1 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (-.f64 (*.f64 (*.f64 (*.f64 a2 (*.f64 th th)) (*.f64 a2 (*.f64 th th))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 (*.f64 a2 (*.f64 (*.f64 th 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)) a2))))
(/.f64 (*.f64 (*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal 1 binary64)) (*.f64 (-.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (*.f64 (*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal -1 binary64)) (*.f64 (-.f64 a2 (*.f64 a2 (*.f64 (*.f64 th 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)) a2))))
(/.f64 (*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) #s(literal -1 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 (sqrt.f64 #s(literal 2 binary64)) a2))))
(/.f64 (*.f64 (*.f64 a2 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (*.f64 (*.f64 a2 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #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)) a2))))
(/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) a2) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) #s(literal -1 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) a2) #s(literal -1 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 (sqrt.f64 #s(literal 2 binary64)) a2))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) a2) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) a2) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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)) a2))))
(/.f64 (*.f64 (+.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a2 (*.f64 a2 a2)))) a2) (*.f64 (+.f64 (*.f64 a2 a2) (-.f64 (*.f64 (*.f64 (*.f64 a2 (*.f64 th th)) (*.f64 a2 (*.f64 th th))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 (*.f64 a2 (*.f64 (*.f64 th 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 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a2 (*.f64 a2 a2)))) (-.f64 #s(literal 0 binary64) a2)) (*.f64 (+.f64 (*.f64 a2 a2) (-.f64 (*.f64 (*.f64 (*.f64 a2 (*.f64 th th)) (*.f64 a2 (*.f64 th th))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 (*.f64 a2 (*.f64 (*.f64 th 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 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) a2) (*.f64 (-.f64 a2 (*.f64 a2 (*.f64 (*.f64 th 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 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 #s(literal 0 binary64) a2)) (*.f64 (-.f64 a2 (*.f64 a2 (*.f64 (*.f64 th 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 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) a2) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (-.f64 #s(literal 0 binary64) a2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 a2 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) a2) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 #s(literal 0 binary64) a2)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) a2) a2) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) a2) (-.f64 #s(literal 0 binary64) a2)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) a2) a2) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) a2) (-.f64 #s(literal 0 binary64) a2)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 a2 a2) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #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 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 a2 a2) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 #s(literal 1 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 binary64) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 a2 a2) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal -1 binary64))
(*.f64 a2 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(*.f64 (*.f64 a2 a2) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 a2 a2) (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 th th))) #s(literal -1 binary64))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 (*.f64 th 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 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 th th))) #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 #s(literal -1 binary64)) (/.f64 (*.f64 a2 (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 th th))) #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 th th))) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))))
(*.f64 (/.f64 (*.f64 a2 (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 th th))) #s(literal -1 binary64))) #s(literal -1 binary64)) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) #s(literal -1/2 binary64)))
(+.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(+.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(+.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) a2))
(+.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 a2 a2)))
(+.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 a2))
(+.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 a2 a2)) (*.f64 a2 a2))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 th th))) #s(literal -1 binary64))))
(fma.f64 a2 a2 (*.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(fma.f64 a2 a2 (*.f64 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) a2))
(fma.f64 (*.f64 a2 a2) #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(fma.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 a2 a2))
(fma.f64 #s(literal 1 binary64) (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 a2 a2)))
(fma.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 a2 a2) (*.f64 a2 a2))
(neg.f64 (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 th th))) #s(literal -1 binary64))))
(/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 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 th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64)) (pow.f64 (*.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) a2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 (*.f64 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) a2) (*.f64 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) a2)) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) a2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) #s(literal 3 binary64)) (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 a2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 th 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 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 th 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 (*.f64 th 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 a2 a2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 a2 a2)) (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (-.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) a2) (*.f64 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) a2))) (-.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) a2)))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 a2)))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 a2 a2)))) (-.f64 (*.f64 a2 a2) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 a2 a2))) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 a2 a2)) (*.f64 a2 a2)))
(*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(*.f64 a2 (neg.f64 (*.f64 a2 (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 th th))) #s(literal -1 binary64)))))
(*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 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 binary64) (*.f64 (*.f64 th 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) a2)
(*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 a2 a2)) (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 th th))) #s(literal -1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 a2 (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 th th))) #s(literal -1 binary64))))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 a2 a2) (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 th th))) #s(literal -1 binary64))))
(*.f64 (*.f64 a2 (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 th th))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) a2))
(*.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(*.f64 (neg.f64 (*.f64 a2 (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 th th))) #s(literal -1 binary64)))) a2)
(+.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(+.f64 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) a2)
(-.f64 (/.f64 (*.f64 a2 a2) (-.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 (*.f64 (*.f64 (*.f64 a2 (*.f64 th th)) (*.f64 a2 (*.f64 th th))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (-.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(fma.f64 a2 #s(literal 1 binary64) (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(fma.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) a2)
(fma.f64 th (*.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) a2) a2)
(fma.f64 #s(literal 1 binary64) a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(fma.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) a2) a2)
(fma.f64 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 th a2) a2)
(fma.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) a2 a2)
(fma.f64 (*.f64 a2 th) (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) a2)
(fma.f64 (*.f64 a2 (*.f64 th th)) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) a2)
(fma.f64 (*.f64 a2 (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) th a2)
(/.f64 a2 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a2 a2) (-.f64 (*.f64 (*.f64 (*.f64 a2 (*.f64 th th)) (*.f64 a2 (*.f64 th th))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (+.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a2 (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 a2 (*.f64 a2 (*.f64 (*.f64 th 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) #s(literal -1 binary64)))) (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 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 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) a2)))
(/.f64 (+.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a2 (*.f64 a2 a2)))) (+.f64 (*.f64 a2 a2) (-.f64 (*.f64 (*.f64 (*.f64 a2 (*.f64 th th)) (*.f64 a2 (*.f64 th th))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))))
(/.f64 (*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (-.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(/.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) a2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) a2) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))
(/.f64 (neg.f64 (+.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a2 (*.f64 a2 a2))))) (neg.f64 (+.f64 (*.f64 a2 a2) (-.f64 (*.f64 (*.f64 (*.f64 a2 (*.f64 th th)) (*.f64 a2 (*.f64 th th))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (neg.f64 (-.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (neg.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) a2)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) a2)) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a2 (*.f64 a2 a2))) (*.f64 a2 (*.f64 a2 a2))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (*.f64 th th)) (*.f64 a2 (*.f64 th th))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (-.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) a2))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (*.f64 th th)) (*.f64 a2 (*.f64 th th))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 a2)) (-.f64 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) a2))
(*.f64 a2 (+.f64 #s(literal 1 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 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) a2)
(*.f64 (+.f64 (*.f64 a2 (*.f64 a2 a2)) (*.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 a2 (*.f64 a2 a2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 a2) (-.f64 (*.f64 (*.f64 (*.f64 a2 (*.f64 th th)) (*.f64 a2 (*.f64 th th))) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))
(*.f64 (*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (-.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (/.f64 #s(literal 1 binary64) (-.f64 a2 (*.f64 a2 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(*.f64 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) a2) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) a2) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))
(+.f64 (*.f64 (*.f64 th 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 (*.f64 th 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 th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(-.f64 (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 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/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.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 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 (*.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 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) #s(literal 1 binary64) #s(literal 1 binary64))
(neg.f64 (+.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 th th))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 (*.f64 th 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 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 th 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 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #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 th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))
(/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #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 th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 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 th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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/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 (*.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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 th 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 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (*.f64 (*.f64 th th) (*.f64 th th))) (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #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 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (*.f64 (*.f64 th th) (*.f64 th th))) (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (*.f64 (*.f64 th th) (*.f64 th th))) (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (*.f64 (*.f64 th th) (*.f64 th th))) (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #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 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (*.f64 (*.f64 th th) (*.f64 th th))) (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) (*.f64 (*.f64 th th) (*.f64 th th))) (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #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 th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(/.f64 (neg.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 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 th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) #s(literal -1 binary64))) (neg.f64 (+.f64 (*.f64 (*.f64 th 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 (*.f64 th 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 th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #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 (*.f64 th 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 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 th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #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 (*.f64 th 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 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 th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))) (/.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #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 (*.f64 th 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 (*.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 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 #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 th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))))))
(*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) (+.f64 (*.f64 (*.f64 th 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 th) (*.f64 (*.f64 th th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 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 th) (*.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64))) (+.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 th) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 th th) #s(literal 1/24 binary64)))) #s(literal -1 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 a2 a2) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(neg.f64 (/.f64 (*.f64 a2 a2) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(neg.f64 (*.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(neg.f64 (*.f64 (cos.f64 th) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))))
(neg.f64 (/.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(neg.f64 (/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 a2 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) a2))
(/.f64 a2 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.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 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 a2 (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) (cos.f64 th)))
(/.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (*.f64 a2 (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (-.f64 #s(literal 0 binary64) a2) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2))
(/.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th))))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(/.f64 (neg.f64 (*.f64 a2 (cos.f64 th))) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (cos.f64 th)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (cos.f64 th)) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 a2 a2) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (cos.f64 th))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) #s(literal -1 binary64))
(*.f64 a2 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (cos.f64 th))
(*.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 a2 (cos.f64 th)))
(*.f64 (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 (cos.f64 th))) #s(literal -1 binary64)))
(*.f64 (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) a2)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 a2 (/.f64 #s(literal 1 binary64) a2)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 a2 a2)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (*.f64 a2 a2))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 (*.f64 a2 (cos.f64 th)) (/.f64 #s(literal 1 binary64) a2)))
(*.f64 (*.f64 a2 (*.f64 a2 (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a2 a2) (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(*.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))) (/.f64 (-.f64 #s(literal 0 binary64) a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))) (/.f64 a2 (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
(*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (cos.f64 th)) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 (/.f64 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 a2 #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (/.f64 (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) #s(literal 1 binary64)) (*.f64 a2 (cos.f64 th)))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (*.f64 a2 (cos.f64 th)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 (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 a2 (cos.f64 th)) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 (*.f64 a2 (cos.f64 th)))) #s(literal -1/2 binary64)))
(/.f64 a2 (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 a2 (cos.f64 th))))
(/.f64 (-.f64 #s(literal 0 binary64) a2) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(*.f64 a2 (cos.f64 th))
(*.f64 (cos.f64 th) a2)
(*.f64 #s(literal 1 binary64) (*.f64 a2 (cos.f64 th)))
(*.f64 (*.f64 a2 (cos.f64 th)) #s(literal 1 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) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 th)) #s(literal -1 binary64))
(*.f64 (cos.f64 th) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (cos.f64 th))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 th)))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a2 (pow.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 #s(literal -1 binary64) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))))
(neg.f64 (*.f64 #s(literal -1 binary64) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))))
(neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (-.f64 #s(literal 0 binary64) a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal -1 binary64))
(*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (-.f64 #s(literal 0 binary64) a2) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) a2)
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) a2) #s(literal -1 binary64)))
(*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))))
(*.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 #s(literal 1 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 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))) #s(literal -1 binary64)))
(exp.f64 (-.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))) a2))
(neg.f64 (*.f64 (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(neg.f64 (*.f64 a2 (*.f64 #s(literal -1 binary64) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) a2) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(/.f64 #s(literal -1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal -1 binary64))
(*.f64 a2 (*.f64 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 #s(literal 1 binary64) (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
(*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) #s(literal 1 binary64))
(*.f64 (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) a2)
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (neg.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a2 a2)) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (/.f64 a2 (/.f64 #s(literal 1 binary64) a2)))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a2 a2) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (/.f64 a2 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)))))
(*.f64 (/.f64 (*.f64 a2 a2) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)) #s(literal -1/2 binary64)))
(*.f64 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)

simplify247.0ms (2.4%)

Algorithm
1×egg-herbie
Rules
4470×*-lowering-*.f32
4470×*-lowering-*.f64
2598×fma-lowering-fma.f32
2598×fma-lowering-fma.f64
1766×fma-define
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
01513137
14822623
216212460
360592456
081212456
Stop Event
1×iter limit
1×node limit
Counts
312 → 312
Calls
Call 1
Inputs
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* (pow th 2) (+ (* -1/720 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (* 1/24 (/ (pow a2 2) (sqrt 2))))))) (/ (pow a2 2) (sqrt 2)))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(/ (* (pow a2 2) (cos th)) (sqrt 2))
(pow a2 2)
(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)
(sqrt 2)
(+ (sqrt 2) (* 1/2 (* (pow th 2) (sqrt 2))))
(+ (sqrt 2) (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2)))))
(+ (sqrt 2) (* (pow th 2) (- (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/720 (sqrt 2)) (+ (* 1/48 (sqrt 2)) (* 1/2 (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2)))))))) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2)))))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (sqrt 2) (cos th))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(/ (pow a1 2) (sqrt 2))
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(pow a1 2)
(/ (pow a2 2) (sqrt 2))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
1
(+ 1 (* -1/2 (pow th 2)))
(+ 1 (* -1/2 (pow th 2)))
(+ 1 (* -1/2 (pow th 2)))
(* -1/2 (pow th 2))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(* -1/2 (pow th 2))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 (pow th 2))
(* -1/2 th)
(* -1/2 th)
(* -1/2 th)
(* -1/2 th)
(* -1/2 th)
(* -1/2 th)
(* -1/2 th)
(* -1/2 th)
(* -1/2 th)
(* -1/2 th)
(* -1/2 th)
(* -1/2 th)
(/ (* (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) (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))))
(* (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/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)))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (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) (* 1/24 (* a2 (pow th 2))))))
(* 1/24 (* a2 (pow th 4)))
(* (pow th 4) (+ (* -1/2 (/ a2 (pow th 2))) (* 1/24 a2)))
(* (pow th 4) (+ (* -1/2 (/ a2 (pow th 2))) (+ (* 1/24 a2) (/ a2 (pow th 4)))))
(* (pow th 4) (+ (* -1/2 (/ a2 (pow th 2))) (+ (* 1/24 a2) (/ a2 (pow th 4)))))
(* 1/24 (* a2 (pow th 4)))
(* (pow th 4) (+ (* -1/2 (/ a2 (pow th 2))) (* 1/24 a2)))
(* (pow th 4) (+ (* -1/2 (/ a2 (pow th 2))) (+ (* 1/24 a2) (/ a2 (pow th 4)))))
(* (pow th 4) (+ (* -1/2 (/ a2 (pow th 2))) (+ (* 1/24 a2) (/ a2 (pow th 4)))))
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)))))
(/ (* (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))
(* 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))
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)
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ a2 (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(/ (pow a2 2) (sqrt 2))
(* 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
(/ (* (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) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.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 th th) (*.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 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))))
(/ (* (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)
(*.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)
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
(+ (sqrt 2) (* 1/2 (* (pow th 2) (sqrt 2))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal 1/2 binary64))))
(+ (sqrt 2) (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2)))))
(+.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 th th) #s(literal -5/24 binary64)) #s(literal -1/2 binary64))) (*.f64 th th))))
(+ (sqrt 2) (* (pow th 2) (- (* (pow th 2) (- (* -1 (* (pow th 2) (+ (* -1/720 (sqrt 2)) (+ (* 1/48 (sqrt 2)) (* 1/2 (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2)))))))) (+ (* -1/4 (sqrt 2)) (* 1/24 (sqrt 2))))) (* -1/2 (sqrt 2)))))
(+.f64 (*.f64 (-.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5/24 binary64)) (*.f64 th (*.f64 th (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -61/720 binary64))))) (*.f64 th (*.f64 th (*.f64 th th)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal 1/2 binary64)))))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (sqrt 2) (cos th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a1 2) (sqrt 2))
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(pow a1 2)
(*.f64 a1 a1)
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(/.f64 (*.f64 a2 (*.f64 a2 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 th th)))))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 th th)))))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 th th)))))
(* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2)))
(/.f64 (*.f64 a2 (*.f64 a2 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 th th)))))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 th th)))))
(* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (/ (pow a2 2) (* (pow th 2) (sqrt 2)))))
(*.f64 (*.f64 th th) (+.f64 (/.f64 (*.f64 (*.f64 a2 a2) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 th th)))))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(/ (* (pow a2 2) (+ 1 (* -1/2 (pow th 2)))) (sqrt 2))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow th 2)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(+ 1 (* -1/2 (pow th 2)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(+ 1 (* -1/2 (pow th 2)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(* (pow th 2) (- (/ 1 (pow th 2)) 1/2))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 (pow th 2))
(*.f64 #s(literal -1/2 binary64) (*.f64 th th))
(* -1/2 th)
(*.f64 th #s(literal -1/2 binary64))
(* -1/2 th)
(*.f64 th #s(literal -1/2 binary64))
(* -1/2 th)
(*.f64 th #s(literal -1/2 binary64))
(* -1/2 th)
(*.f64 th #s(literal -1/2 binary64))
(* -1/2 th)
(*.f64 th #s(literal -1/2 binary64))
(* -1/2 th)
(*.f64 th #s(literal -1/2 binary64))
(* -1/2 th)
(*.f64 th #s(literal -1/2 binary64))
(* -1/2 th)
(*.f64 th #s(literal -1/2 binary64))
(* -1/2 th)
(*.f64 th #s(literal -1/2 binary64))
(* -1/2 th)
(*.f64 th #s(literal -1/2 binary64))
(* -1/2 th)
(*.f64 th #s(literal -1/2 binary64))
(* -1/2 th)
(*.f64 th #s(literal -1/2 binary64))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 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)))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 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)))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 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)))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 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)))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 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)))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 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)))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 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)))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 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)))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 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)))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 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)))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 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)))
(/ (* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2)))) (sqrt 2))
(/.f64 (*.f64 a2 (*.f64 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)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.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))) (* 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))))))
(* 1/24 (/ (* (pow a2 2) (pow th 4)) (sqrt 2)))
(/.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a2 (*.f64 a2 (*.f64 th (*.f64 th (*.f64 th th)))))) (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 th (*.f64 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 th (*.f64 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 th (*.f64 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 th (*.f64 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 th (*.f64 th (*.f64 th th))))))
(* 1/24 (/ (* (pow a2 2) (pow th 4)) (sqrt 2)))
(/.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a2 (*.f64 a2 (*.f64 th (*.f64 th (*.f64 th th)))))) (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 th (*.f64 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 th (*.f64 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 th (*.f64 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 th (*.f64 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 th (*.f64 th (*.f64 th th))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 a2 (*.f64 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)))))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 a2 (*.f64 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)))))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 a2 (*.f64 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)))))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 a2 (*.f64 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)))))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 a2 (*.f64 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)))))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 a2 (*.f64 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)))))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 a2 (*.f64 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)))))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 a2 (*.f64 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)))))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 a2 (*.f64 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)))))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 a2 (*.f64 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)))))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 a2 (*.f64 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)))))))))
(* (pow a2 2) (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 a2 (*.f64 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)))))))))
(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 a2 (*.f64 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)))))))))
(+ (* (pow th 2) (+ (* -1/2 (pow a2 2)) (* 1/24 (* (pow a2 2) (pow th 2))))) (pow a2 2))
(*.f64 a2 (*.f64 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/24 (* (pow a2 2) (pow th 4)))
(*.f64 #s(literal 1/24 binary64) (*.f64 a2 (*.f64 a2 (*.f64 th (*.f64 th (*.f64 th th))))))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (pow th 2))) (* 1/24 (pow a2 2))))
(*.f64 (*.f64 th (*.f64 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 th (*.f64 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 a2 (/.f64 a2 (*.f64 th (*.f64 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 th (*.f64 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 a2 (/.f64 a2 (*.f64 th (*.f64 th (*.f64 th th)))))))
(* 1/24 (* (pow a2 2) (pow th 4)))
(*.f64 #s(literal 1/24 binary64) (*.f64 a2 (*.f64 a2 (*.f64 th (*.f64 th (*.f64 th th))))))
(* (pow th 4) (+ (* -1/2 (/ (pow a2 2) (pow th 2))) (* 1/24 (pow a2 2))))
(*.f64 (*.f64 th (*.f64 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 th (*.f64 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 a2 (/.f64 a2 (*.f64 th (*.f64 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 th (*.f64 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 a2 (/.f64 a2 (*.f64 th (*.f64 th (*.f64 th th)))))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 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))))))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 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))))))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 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))))))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 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))))))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 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))))))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 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))))))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 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))))))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 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))))))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 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))))))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 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))))))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 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))))))))
(* a2 (+ 1 (* (pow th 2) (- (* 1/24 (pow th 2)) 1/2))))
(*.f64 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))))))))
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 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th #s(literal 1/24 binary64))))))))
(+ a2 (* (pow th 2) (+ (* -1/2 a2) (* 1/24 (* a2 (pow th 2))))))
(*.f64 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/24 (* a2 (pow th 4)))
(*.f64 th (*.f64 (*.f64 th (*.f64 a2 (*.f64 th th))) #s(literal 1/24 binary64)))
(* (pow th 4) (+ (* -1/2 (/ a2 (pow th 2))) (* 1/24 a2)))
(*.f64 (*.f64 th (*.f64 th (*.f64 th th))) (*.f64 a2 (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(* (pow th 4) (+ (* -1/2 (/ a2 (pow th 2))) (+ (* 1/24 a2) (/ a2 (pow th 4)))))
(*.f64 (*.f64 th (*.f64 th (*.f64 th th))) (+.f64 (*.f64 a2 (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 a2 (*.f64 th (*.f64 th (*.f64 th th))))))
(* (pow th 4) (+ (* -1/2 (/ a2 (pow th 2))) (+ (* 1/24 a2) (/ a2 (pow th 4)))))
(*.f64 (*.f64 th (*.f64 th (*.f64 th th))) (+.f64 (*.f64 a2 (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 a2 (*.f64 th (*.f64 th (*.f64 th th))))))
(* 1/24 (* a2 (pow th 4)))
(*.f64 th (*.f64 (*.f64 th (*.f64 a2 (*.f64 th th))) #s(literal 1/24 binary64)))
(* (pow th 4) (+ (* -1/2 (/ a2 (pow th 2))) (* 1/24 a2)))
(*.f64 (*.f64 th (*.f64 th (*.f64 th th))) (*.f64 a2 (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))))
(* (pow th 4) (+ (* -1/2 (/ a2 (pow th 2))) (+ (* 1/24 a2) (/ a2 (pow th 4)))))
(*.f64 (*.f64 th (*.f64 th (*.f64 th th))) (+.f64 (*.f64 a2 (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 a2 (*.f64 th (*.f64 th (*.f64 th th))))))
(* (pow th 4) (+ (* -1/2 (/ a2 (pow th 2))) (+ (* 1/24 a2) (/ a2 (pow th 4)))))
(*.f64 (*.f64 th (*.f64 th (*.f64 th th))) (+.f64 (*.f64 a2 (+.f64 #s(literal 1/24 binary64) (/.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (/.f64 a2 (*.f64 th (*.f64 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 th (*.f64 th (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 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 th (*.f64 th #s(literal 1/24 binary64)))))))
(* 1/24 (pow th 4))
(*.f64 th (*.f64 th (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 th (*.f64 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 th (*.f64 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 th (*.f64 th (*.f64 th th))))))
(* (pow th 4) (- (+ 1/24 (/ 1 (pow th 4))) (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 th (*.f64 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 th (*.f64 th (*.f64 th th))))))
(* 1/24 (pow th 4))
(*.f64 th (*.f64 th (*.f64 th (*.f64 th #s(literal 1/24 binary64)))))
(* (pow th 4) (- 1/24 (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 th (*.f64 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 th (*.f64 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 th (*.f64 th (*.f64 th th))))))
(* (pow th 4) (- (+ 1/24 (/ 1 (pow th 4))) (* 1/2 (/ 1 (pow th 2)))))
(*.f64 (*.f64 th (*.f64 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 th (*.f64 th (*.f64 th th))))))
(/ (* (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) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))) (/ (pow a2 2) (sqrt 2)))
(/.f64 (*.f64 (*.f64 a2 a2) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
(+ (* (pow th 2) (+ (* -1/2 (/ (pow a2 2) (sqrt 2))) (* 1/24 (/ (* (pow a2 2) (pow th 2)) (sqrt 2))))) (/ (pow a2 2) (sqrt 2)))
(+.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.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 th th) (*.f64 (/.f64 (*.f64 a2 (*.f64 a2 (*.f64 th th))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 th #s(literal -1/720 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))))
(/ (* (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))))
(* 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 #s(literal 1 binary64) (*.f64 th (*.f64 th (+.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 th (*.f64 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))
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 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 (*.f64 th th) (+.f64 #s(literal -1/2 binary64) (*.f64 th (*.f64 th (+.f64 #s(literal 1/24 binary64) (*.f64 th (*.f64 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)
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ a2 (sqrt 2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/ (pow a2 2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* 1/24 (pow th 2))
(*.f64 th (*.f64 th #s(literal 1/24 binary64)))
(* 1/24 (pow th 2))
(*.f64 th (*.f64 th #s(literal 1/24 binary64)))
(* 1/24 (pow th 2))
(*.f64 th (*.f64 th #s(literal 1/24 binary64)))
(* 1/24 (pow th 2))
(*.f64 th (*.f64 th #s(literal 1/24 binary64)))
(* 1/24 (pow th 2))
(*.f64 th (*.f64 th #s(literal 1/24 binary64)))
(* 1/24 (pow th 2))
(*.f64 th (*.f64 th #s(literal 1/24 binary64)))
(* 1/24 (pow th 2))
(*.f64 th (*.f64 th #s(literal 1/24 binary64)))
(* 1/24 (pow th 2))
(*.f64 th (*.f64 th #s(literal 1/24 binary64)))
(* 1/24 (pow th 2))
(*.f64 th (*.f64 th #s(literal 1/24 binary64)))
(* 1/24 (pow th 2))
(*.f64 th (*.f64 th #s(literal 1/24 binary64)))
(* 1/24 (pow th 2))
(*.f64 th (*.f64 th #s(literal 1/24 binary64)))
(* 1/24 (pow th 2))
(*.f64 th (*.f64 th #s(literal 1/24 binary64)))

eval195.0ms (1.9%)

Compiler

Compiled 26979 to 2111 computations (92.2% saved)

prune150.0ms (1.5%)

Pruning

35 alts after pruning (31 fresh and 4 done)

PrunedKeptTotal
New1144171161
Fresh71421
Picked325
Done123
Total1155351190
Accuracy
100.0%
Counts
1190 → 35
Alt Table
Click to see full alt table
StatusAccuracyProgram
11.1%
(/.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)))
8.7%
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
65.6%
(/.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))
✓99.7%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
✓65.6%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
53.5%
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
50.6%
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) a2) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
99.5%
(/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64)))
▶32.1%
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))
✓60.7%
(/.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)))))))) (sqrt.f64 #s(literal 2 binary64)))
57.5%
(/.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (sqrt.f64 #s(literal 2 binary64)))
14.4%
(/.f64 (*.f64 a2 (*.f64 a2 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
56.6%
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal 1/2 binary64)))))
65.6%
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
✓13.8%
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
99.4%
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
99.5%
(/.f64 a2 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) a2))
57.5%
(/.f64 a2 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))))
13.8%
(/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
53.5%
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
▶8.7%
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
▶65.6%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
13.8%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
65.5%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
99.4%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))
48.7%
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))) #s(literal 1/64 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
▶99.5%
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
99.4%
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
99.5%
(*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (cos.f64 th))
65.6%
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
11.2%
(*.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)))))
99.5%
(*.f64 (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 a2 (cos.f64 th)))
59.3%
(*.f64 (*.f64 a2 a2) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))))
16.0%
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
▶65.6%
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
Compiler

Compiled 1363 to 844 computations (38.1% saved)

simplify202.0ms (2%)

Algorithm
1×egg-herbie
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓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)))) (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))
✓cost-diff128
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
✓cost-diff0
(+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
✓cost-diff0
(*.f64 a1 a1)
✓cost-diff0
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff384
(*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
✓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 a2 (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
✓cost-diff0
(sqrt.f64 #s(literal 2 binary64))
✓cost-diff0
(*.f64 a2 a2)
✓cost-diff0
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
Rules
4522×*-lowering-*.f32
4522×*-lowering-*.f64
3078×+-lowering-+.f64
3078×+-lowering-+.f32
1538×times-frac
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
033265
1109216
2290216
3839216
42754216
08770216
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(* (/ (* a2 a2) (sqrt 2)) (cos th))
(/ (* a2 a2) (sqrt 2))
(* a2 a2)
a2
(sqrt 2)
2
(cos th)
th
(* a2 (/ a2 (sqrt 2)))
a2
(/ a2 (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
(/ (* (* a1 a1) (+ 1 (/ (* a2 a2) (* a1 a1)))) (sqrt 2))
(* (* a1 a1) (+ 1 (/ (* a2 a2) (* a1 a1))))
(* a1 a1)
a1
(+ 1 (/ (* a2 a2) (* a1 a1)))
1
(/ (* a2 a2) (* a1 a1))
(* a2 a2)
a2
(sqrt 2)
2
(/ 1 (/ (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2)) (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2)))))))
1
(/ (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2)) (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))))
(* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (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))
(sqrt 2)
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 a2)))
(* a2 (* a2 a2))
Outputs
(* (/ (* a2 a2) (sqrt 2)) (cos th))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/ (* a2 a2) (sqrt 2))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(* a2 a2)
(*.f64 a2 a2)
a2
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(cos th)
(cos.f64 th)
th
(* a2 (/ a2 (sqrt 2)))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
a2
(/ a2 (sqrt 2))
(/.f64 a2 (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 a2 a2) (*.f64 a1 a1)) (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 a2 a2) (*.f64 a1 a1)))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 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
(/ (* (* a1 a1) (+ 1 (/ (* a2 a2) (* a1 a1)))) (sqrt 2))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(* (* a1 a1) (+ 1 (/ (* a2 a2) (* a1 a1))))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(* a1 a1)
(*.f64 a1 a1)
a1
(+ 1 (/ (* a2 a2) (* a1 a1)))
(+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (/.f64 a2 a1)) a1))
1
#s(literal 1 binary64)
(/ (* a2 a2) (* a1 a1))
(/.f64 (*.f64 a2 (/.f64 a2 a1)) a1)
(* 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) (- (* a2 a2) (* a1 a1)))) (sqrt 2)) (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2)))))))
(/.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 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)))))))
1
#s(literal 1 binary64)
(/ (* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2)) (+ (* (* a1 a1) (* a1 (* a1 (* a1 a1)))) (* (* a2 a2) (* a2 (* a2 (* a2 a2))))))
(*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2))))))))
(* (+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1)))) (sqrt 2))
(*.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))))))
(+ (* a1 (* a1 (* a1 a1))) (* (* a2 a2) (- (* a2 a2) (* a1 a1))))
(+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 a2 (*.f64 a2 (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(* a1 (* a1 (* a1 a1)))
(*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))
a1
(* a1 (* a1 a1))
(*.f64 a1 (*.f64 a1 a1))
(* a1 a1)
(*.f64 a1 a1)
(* (* a2 a2) (- (* a2 a2) (* a1 a1)))
(*.f64 a2 (*.f64 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))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#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 a2 (*.f64 a2 (*.f64 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 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))
(* a2 (* a2 (* a2 a2)))
(*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))
(* a2 (* a2 a2))
(*.f64 a2 (*.f64 a2 a2))

localize242.0ms (2.4%)

Localize:

Found 19 expressions of interest:

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

Compiled 375 to 34 computations (90.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 71.0ms
ival-mult: 42.0ms (58.9% of total)
ival-div: 12.0ms (16.8% of total)
ival-add: 7.0ms (9.8% of total)
ival-cos: 6.0ms (8.4% of total)
ival-sqrt: 2.0ms (2.8% of total)
ival-sub: 1.0ms (1.4% of total)
const: 1.0ms (1.4% of total)
backward-pass: 0.0ms (0% of total)

series31.0ms (0.3%)

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

96 calls:

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

rewrite436.0ms (4.2%)

Algorithm
1×batch-egg-rewrite
Rules
3612×*-lowering-*.f32
3612×*-lowering-*.f64
3068×/-lowering-/.f32
3068×/-lowering-/.f64
1538×fma-lowering-fma.f32
Iterations

Useful iterations: 2 (0.0ms)

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

simplify315.0ms (3.1%)

Algorithm
1×egg-herbie
Rules
3172×*-lowering-*.f32
3172×*-lowering-*.f64
2238×/-lowering-/.f32
2238×/-lowering-/.f64
2058×+-lowering-+.f64
Iterations

Useful iterations: 2 (0.0ms)

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

eval231.0ms (2.3%)

Compiler

Compiled 47016 to 2520 computations (94.6% saved)

prune233.0ms (2.3%)

Pruning

45 alts after pruning (39 fresh and 6 done)

PrunedKeptTotal
New1381181399
Fresh52126
Picked325
Done044
Total1389451434
Accuracy
100.0%
Counts
1434 → 45
Alt Table
Click to see full alt table
StatusAccuracyProgram
11.1%
(/.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)))
✓99.7%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
✓65.6%
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))
53.5%
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) #s(literal 1/4 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2))))
3.3%
(/.f64 (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))))
50.6%
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) a2) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
99.5%
(/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64)))
41.6%
(/.f64 (*.f64 (*.f64 a1 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) a1) (sqrt.f64 #s(literal 2 binary64)))
32.0%
(/.f64 (*.f64 (*.f64 a1 a1) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
43.3%
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 a1 (/.f64 (*.f64 a2 a2) a1))))) (sqrt.f64 #s(literal 2 binary64)))
43.3%
(/.f64 (*.f64 (*.f64 a1 a1) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 a2 a1) (/.f64 a2 a1)))) (sqrt.f64 #s(literal 2 binary64)))
✓60.7%
(/.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)))))))) (sqrt.f64 #s(literal 2 binary64)))
57.5%
(/.f64 (*.f64 a2 (*.f64 a2 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 th th))))) (sqrt.f64 #s(literal 2 binary64)))
14.4%
(/.f64 (*.f64 a2 (*.f64 a2 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)))) (sqrt.f64 #s(literal 2 binary64)))
56.6%
(/.f64 (*.f64 a2 a2) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th th) #s(literal 1/2 binary64)))))
65.6%
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
✓13.8%
(/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))
99.4%
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
99.5%
(/.f64 a2 (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) a2))
65.5%
(/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
57.5%
(/.f64 a2 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64)))))))
13.8%
(/.f64 a1 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a1))
53.5%
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal 1/2 binary64)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 th th) (*.f64 th th)) #s(literal -1/4 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))))
0.8%
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a1 a1) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 (*.f64 a1 (*.f64 a1 a1)))) (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (*.f64 a2 a2)))))))
8.7%
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 (*.f64 a2 (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)))))))
65.5%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
13.8%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
65.6%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
3.6%
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (*.f64 (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))) (-.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))))))
65.6%
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
65.5%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
65.5%
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (*.f64 a2 a2))
48.7%
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th)))) #s(literal 1/64 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 th th) (*.f64 (*.f64 th th) (*.f64 th th))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) (+.f64 (*.f64 th (*.f64 th #s(literal -1/2 binary64))) #s(literal -1 binary64)))))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
✓99.5%
(*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
99.4%
(*.f64 (/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) a2)
99.5%
(*.f64 (/.f64 a2 (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (cos.f64 th))
8.6%
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))))) (*.f64 (*.f64 a2 a2) (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a1 (*.f64 a1 (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))))
11.2%
(*.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)))))
65.5%
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal 2 binary64)))))
99.5%
(*.f64 (*.f64 a2 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64))) (*.f64 a2 (cos.f64 th)))
59.3%
(*.f64 (*.f64 a2 a2) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 th (*.f64 th #s(literal -1/2 binary64))))))
99.4%
(*.f64 (*.f64 a2 a2) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal -1/2 binary64)) (cos.f64 th)))
16.0%
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 th th)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
✓65.6%
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
65.5%
(*.f64 a2 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2)))
Compiler

Compiled 2461 to 829 computations (66.3% saved)

regimes173.0ms (1.7%)

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

8 calls:

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

Compiled 59 to 40 computations (32.2% saved)

regimes148.0ms (1.4%)

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

6 calls:

22.0ms
th
20.0ms
(*.f64 a2 a2)
19.0ms
a2
19.0ms
a1
18.0ms
(cos.f64 th)
Results
AccuracySegmentsBranch
99.7%1a1
99.7%1a2
99.7%1th
99.7%1(cos.f64 th)
99.7%1(*.f64 a1 a1)
99.7%1(*.f64 a2 a2)
Compiler

Compiled 29 to 21 computations (27.6% saved)

regimes131.0ms (1.3%)

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

6 calls:

32.0ms
th
19.0ms
(cos.f64 th)
18.0ms
a2
18.0ms
a1
17.0ms
(*.f64 a2 a2)
Results
AccuracySegmentsBranch
99.5%1a1
99.5%1a2
99.5%1th
99.5%1(cos.f64 th)
99.5%1(*.f64 a1 a1)
99.5%1(*.f64 a2 a2)
Compiler

Compiled 29 to 21 computations (27.6% saved)

regimes102.0ms (1%)

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

6 calls:

17.0ms
a1
16.0ms
th
16.0ms
a2
15.0ms
(*.f64 a2 a2)
15.0ms
(cos.f64 th)
Results
AccuracySegmentsBranch
99.5%1a1
99.5%1a2
99.5%1th
99.5%1(cos.f64 th)
99.5%1(*.f64 a1 a1)
99.5%1(*.f64 a2 a2)
Compiler

Compiled 29 to 21 computations (27.6% saved)

regimes102.0ms (1%)

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

6 calls:

18.0ms
a2
16.0ms
(cos.f64 th)
16.0ms
a1
15.0ms
(*.f64 a2 a2)
14.0ms
th
Results
AccuracySegmentsBranch
99.5%1a1
99.5%1a2
99.5%1th
99.5%1(cos.f64 th)
99.5%1(*.f64 a1 a1)
99.5%1(*.f64 a2 a2)
Compiler

Compiled 29 to 21 computations (27.6% saved)

regimes117.0ms (1.1%)

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

6 calls:

33.0ms
(*.f64 a2 a2)
18.0ms
a1
16.0ms
a2
14.0ms
th
13.0ms
(cos.f64 th)
Results
AccuracySegmentsBranch
99.4%1a1
99.4%1(*.f64 a1 a1)
99.4%1a2
99.4%1th
99.4%1(cos.f64 th)
99.4%1(*.f64 a2 a2)
Compiler

Compiled 29 to 21 computations (27.6% saved)

regimes102.0ms (1%)

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

5 calls:

30.0ms
(*.f64 a1 a1)
24.0ms
th
17.0ms
a1
14.0ms
a2
13.0ms
(*.f64 a2 a2)
Results
AccuracySegmentsBranch
65.6%1a1
67.5%2a2
65.6%1th
65.6%1(*.f64 a1 a1)
65.6%1(*.f64 a2 a2)
Compiler

Compiled 24 to 17 computations (29.2% saved)

regimes9.0ms (0.1%)

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

1 calls:

7.0ms
a2
Results
AccuracySegmentsBranch
67.5%2a2
Compiler

Compiled 4 to 3 computations (25% saved)

regimes31.0ms (0.3%)

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

5 calls:

7.0ms
(*.f64 a2 a2)
5.0ms
a2
5.0ms
a1
5.0ms
th
5.0ms
(*.f64 a1 a1)
Results
AccuracySegmentsBranch
65.6%1a1
65.6%1(*.f64 a1 a1)
65.6%1th
65.6%1(*.f64 a2 a2)
65.6%1a2
Compiler

Compiled 24 to 17 computations (29.2% saved)

regimes31.0ms (0.3%)

Accuracy

Total -33.3b remaining (-151.1%)

Threshold costs -33.3b (-151.1%)

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

5 calls:

17.0ms
a1
3.0ms
th
3.0ms
a2
3.0ms
(*.f64 a2 a2)
3.0ms
(*.f64 a1 a1)
Results
AccuracySegmentsBranch
65.6%1a1
65.6%1(*.f64 a1 a1)
65.6%1a2
65.6%1th
65.6%1(*.f64 a2 a2)
Compiler

Compiled 24 to 17 computations (29.2% saved)

bsearch19.0ms (0.2%)

Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
17.0ms
5.497923133026964e+295
4.397857175283128e+297
Results
12.0ms112×0valid
Compiler

Compiled 280 to 206 computations (26.4% saved)

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

bsearch14.0ms (0.1%)

Algorithm
1×binary-search
Stop Event
1×predicate-same
Steps
TimeLeftRight
12.0ms
5.497923133026964e+295
4.397857175283128e+297
Results
9.0ms80×0valid
Compiler

Compiled 188 to 137 computations (27.1% saved)

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

simplify9.0ms (0.1%)

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

Useful iterations: 0 (0.0ms)

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

soundness2.4s (23.3%)

Rules
5250×*-lowering-*.f32
5250×*-lowering-*.f64
4888×*-lowering-*.f32
4888×*-lowering-*.f64
4708×*-lowering-*.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02925866
19694648
236684338
082624338
031131
1156121
21130121
08426121
027138
1145130
21205130
08447130
01513137
14822623
216212460
360592456
081212456
01582679
15721963
223471839
359551823
086821823
01560
18260
273360
0888560
01211
12911
26011
39511
412111
512511
012511
033138
1223128
21929122
08235122
Stop Event
1×fuel
1×iter limit
1×node limit
1×iter limit
1×saturated
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
Compiler

Compiled 561 to 340 computations (39.4% saved)

preprocess81.0ms (0.8%)

Remove

(sort a1 a2)

(abs th)

(abs a2)

(abs a1)

Compiler

Compiled 838 to 450 computations (46.3% saved)

end0.0ms (0%)

Profiling

Loading profile data...