Migdal et al, Equation (64)

Time bar (total: 5.2s)

start0.0ms (0.0%)

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

analyze2.0ms (0.0%)

Memory
-37.5MiB live, 11.9MiB allocated; 2ms collecting garbage
Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0.0%0.0%99.9%0.1%0.0%0.0%0.0%0
100.0%99.9%0.0%0.1%0.0%0.0%0.0%1
Compiler

Compiled 21 to 14 computations (33.3% saved)

sample1.4s (27.2%)

Memory
65.3MiB live, 8 043.8MiB allocated; 436ms collecting garbage
Samples
1.0s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 655.0ms
ival-cos: 282.0ms (43.0% of total)
ival-mult!: 276.0ms (42.1% of total)
ival-div!: 72.0ms (11.0% of total)
ival-add!: 22.0ms (3.4% of total)
adjust: 2.0ms (0.3% of total)
Bogosity

preprocess36.0ms (0.7%)

Memory
-12.0MiB live, 181.9MiB allocated; 11ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
041133
1197133
21006133
Stop Event
node-limit
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.6%
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
Symmetry

(abs a1)

(abs a2)

(abs th)

(sort a1 a2)

Compiler

Compiled 38 to 24 computations (36.8% saved)

sample0.0ms (0.0%)

Memory
3.3MiB live, 3.3MiB allocated; 0ms collecting garbage
Calls
Call 1
Inputs
2
(sqrt 2)
Outputs
#s(literal 2 binary64)
#s(literal 6369051672525773/4503599627370496 binary64)
Samples
0.0ms0valid
Compiler

Compiled 5 to 4 computations (20.0% saved)

Precisions
Click to see histograms. Total time spent on operations: 0.0ms
adjust: 0.0ms (0.0% of total)

series53.0ms (1.0%)

Memory
12.1MiB live, 443.4MiB allocated; 13ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0148912
Stop Event
iter-limit
Counts
12 → 32
Calls
Call 1
Inputs
th
(cos.f64 th)
#s(literal 2 binary64)
(sqrt.f64 #s(literal 2 binary64))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
a1
(*.f64 a1 a1)
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
a2
(*.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)))
Outputs
#s(approx a1 a1)
#s(approx (* a1 a1) (pow.f64 a1 #s(literal 2 binary64)))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx a2 a2)
#s(approx (* a2 a2) (pow.f64 a2 #s(literal 2 binary64)))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx th th)
#s(approx (cos th) #s(literal 1 binary64))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 th #s(literal 2 binary64)))))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (cos th) (sqrt 2)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (cos th) (cos.f64 th))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
Calls

9 calls:

TimeVariablePoint
5.0ms
th
inf
4.0ms
th
-inf
4.0ms
a1
0
3.0ms
a2
inf
3.0ms
a2
0

rewrite226.0ms (4.3%)

Memory
7.3MiB live, 1 081.1MiB allocated; 77ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01256
02050
18450
246450
3276550
0407550
Stop Event
iter-limit
node-limit
iter-limit
Counts
12 → 348
Calls
Call 1
Inputs
th
(cos.f64 th)
#s(literal 2 binary64)
(sqrt.f64 #s(literal 2 binary64))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
a1
(*.f64 a1 a1)
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
a2
(*.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)))
Outputs
th
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (cos.f64 th) (*.f64 (sin.f64 th) #s(literal 0 binary64)))) (*.f64 (sin.f64 th) #s(literal 0 binary64)))
(*.f64 #s(literal 1 binary64) (cos.f64 th))
(*.f64 (cos.f64 th) #s(literal 1 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (PI.f64))))) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (neg.f64 (fabs.f64 th)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (neg.f64 (fabs.f64 th)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) th) (PI.f64)))) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) th) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (PI.f64)) (PI.f64)))) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (PI.f64)) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (-.f64 (neg.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64))))) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (-.f64 (neg.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (-.f64 (fabs.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64))))) (cos.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (-.f64 (fabs.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th))) (neg.f64 (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (neg.f64 (fabs.f64 th)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) th) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (PI.f64)) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (neg.f64 (fabs.f64 th))))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (neg.f64 (fabs.f64 th)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) th) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) th) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (PI.f64)))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (+.f64 (neg.f64 th) (PI.f64)) (PI.f64)))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (+.f64 (neg.f64 th) (PI.f64)) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (+.f64 (fabs.f64 th) (PI.f64)) (PI.f64)))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (+.f64 (fabs.f64 th) (PI.f64)) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (+.f64 (PI.f64) th) (PI.f64)))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (+.f64 (+.f64 (PI.f64) th) (PI.f64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (fabs.f64 th)))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (neg.f64 (fabs.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (cos.f64 th) (cos.f64 th)) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (fabs.f64 th))) (cos.f64 th)) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th)) (cos.f64 th)) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (sin.f64 th) #s(literal 0 binary64))) (*.f64 (cos.f64 th) (cos.f64 th))) (sin.f64 (-.f64 th (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (cos.f64 th) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (sin.f64 th) #s(literal 0 binary64))) (-.f64 (*.f64 (cos.f64 th) (cos.f64 th)) (*.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (cos.f64 th)))))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (neg.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 (fabs.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (neg.f64 (cos.f64 th))) #s(literal 2 binary64))
(neg.f64 (neg.f64 (cos.f64 th)))
(sin.f64 (neg.f64 (neg.f64 (-.f64 (neg.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64))))))
(sin.f64 (neg.f64 (neg.f64 (-.f64 (fabs.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64))))))
(sin.f64 (neg.f64 (+.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (neg.f64 (+.f64 (+.f64 (neg.f64 th) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (neg.f64 (+.f64 (+.f64 (fabs.f64 th) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (neg.f64 (+.f64 (+.f64 (PI.f64) th) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(sin.f64 (neg.f64 (+.f64 (-.f64 (neg.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (PI.f64))))
(sin.f64 (neg.f64 (+.f64 (-.f64 (fabs.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (neg.f64 (fabs.f64 th))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) th) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (+.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (+.f64 (+.f64 (neg.f64 th) (PI.f64)) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (+.f64 (+.f64 (fabs.f64 th) (PI.f64)) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) th) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (-.f64 (neg.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64)))) (PI.f64)))
(sin.f64 (+.f64 (neg.f64 (-.f64 (fabs.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64)))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (+.f64 (neg.f64 th) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (+.f64 (fabs.f64 th) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (+.f64 (PI.f64) th) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (-.f64 (neg.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (PI.f64)) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (-.f64 (fabs.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (PI.f64)) (PI.f64)))
(sin.f64 (neg.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 th)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(sin.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) th) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (PI.f64)) (PI.f64)))
(sin.f64 (-.f64 (neg.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(sin.f64 (-.f64 (fabs.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64))))
(sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th))
(-.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) th)) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 th)) #s(literal 1 binary64)))
(-.f64 (*.f64 (cos.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (PI.f64))) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 th)) #s(literal 1 binary64)))
(-.f64 (*.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (*.f64 (sin.f64 (+.f64 (neg.f64 th) (PI.f64))) #s(literal 0 binary64)))
(-.f64 (*.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (*.f64 (sin.f64 (+.f64 (fabs.f64 th) (PI.f64))) #s(literal 0 binary64)))
(-.f64 (*.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (*.f64 (sin.f64 (+.f64 (PI.f64) th)) #s(literal 0 binary64)))
(-.f64 (*.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (*.f64 (neg.f64 (sin.f64 th)) #s(literal 0 binary64)))
(-.f64 (*.f64 (sin.f64 (neg.f64 th)) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal -1 binary64)))
(-.f64 (*.f64 (sin.f64 (fabs.f64 th)) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal -1 binary64)))
(-.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (neg.f64 (cos.f64 th)) #s(literal 1 binary64)))
(-.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal -1 binary64)))
(-.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (neg.f64 (cos.f64 th)))
(-.f64 (cos.f64 th) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 th))))
(cos.f64 (fabs.f64 (neg.f64 (neg.f64 (fabs.f64 th)))))
(cos.f64 (fabs.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) th) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 (fabs.f64 (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
(cos.f64 (fabs.f64 (+.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (PI.f64))))
(cos.f64 (fabs.f64 (+.f64 (+.f64 (neg.f64 th) (PI.f64)) (PI.f64))))
(cos.f64 (fabs.f64 (+.f64 (+.f64 (fabs.f64 th) (PI.f64)) (PI.f64))))
(cos.f64 (fabs.f64 (+.f64 (+.f64 (PI.f64) th) (PI.f64))))
(cos.f64 (+.f64 (neg.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (*.f64 (PI.f64) #s(literal -1/2 binary64)))) (PI.f64)))
(cos.f64 (+.f64 (neg.f64 (+.f64 (neg.f64 th) (PI.f64))) (PI.f64)))
(cos.f64 (+.f64 (neg.f64 (+.f64 (fabs.f64 th) (PI.f64))) (PI.f64)))
(cos.f64 (+.f64 (neg.f64 (+.f64 (PI.f64) th)) (PI.f64)))
(cos.f64 (+.f64 (fabs.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (*.f64 (PI.f64) #s(literal -1/2 binary64)))) (PI.f64)))
(cos.f64 (+.f64 (fabs.f64 (+.f64 (neg.f64 th) (PI.f64))) (PI.f64)))
(cos.f64 (+.f64 (fabs.f64 (+.f64 (fabs.f64 th) (PI.f64))) (PI.f64)))
(cos.f64 (+.f64 (fabs.f64 (+.f64 (PI.f64) th)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (neg.f64 (fabs.f64 th)) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (-.f64 (neg.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (-.f64 (fabs.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (PI.f64)))
(cos.f64 (+.f64 (neg.f64 (-.f64 (neg.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (+.f64 (neg.f64 (-.f64 (fabs.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (+.f64 (+.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (neg.f64 th) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (fabs.f64 th) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (PI.f64) th) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (+.f64 (+.f64 (-.f64 (neg.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (+.f64 (+.f64 (-.f64 (fabs.f64 th) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (/.f64 (*.f64 #s(literal 2 binary64) th) #s(literal 2 binary64)))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 th))))
(cos.f64 (+.f64 (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) th) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (PI.f64)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (+.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (*.f64 (PI.f64) #s(literal -1/2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (neg.f64 th) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (fabs.f64 th) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (PI.f64) th) (PI.f64)))
(cos.f64 (neg.f64 (fabs.f64 th)))
(cos.f64 (neg.f64 th))
(cos.f64 (fabs.f64 th))
(cos.f64 th)
(+.f64 (*.f64 (sin.f64 (neg.f64 (fabs.f64 th))) #s(literal 0 binary64)) (cos.f64 th))
(+.f64 (*.f64 (sin.f64 (/.f64 (*.f64 #s(literal 2 binary64) th) #s(literal 2 binary64))) #s(literal 0 binary64)) (cos.f64 th))
(+.f64 (*.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) #s(literal -1/2 binary64)) th)) #s(literal 0 binary64)))
(+.f64 (*.f64 (neg.f64 (cos.f64 th)) #s(literal -1 binary64)) (*.f64 (cos.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) th) (PI.f64))) #s(literal 0 binary64)))
(+.f64 (*.f64 (sin.f64 (neg.f64 th)) #s(literal 0 binary64)) (cos.f64 th))
(+.f64 (*.f64 (sin.f64 (fabs.f64 th)) #s(literal 0 binary64)) (cos.f64 th))
(+.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (cos.f64 th))
(+.f64 (cos.f64 th) (*.f64 #s(literal 0 binary64) (sin.f64 (fabs.f64 th))))
(+.f64 (cos.f64 th) (*.f64 #s(literal 0 binary64) (sin.f64 (neg.f64 th))))
(+.f64 (cos.f64 th) (*.f64 (sin.f64 th) #s(literal 0 binary64)))
#s(literal 2 binary64)
(*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 #s(literal 2 binary64) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(cosh.f64 (asinh.f64 #s(literal 1 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(fabs.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(fabs.f64 (sqrt.f64 #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (cos.f64 th)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (neg.f64 (cos.f64 th)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal -1 binary64) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 th) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sin.f64 th) #s(literal 0 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
a1
(*.f64 (pow.f64 (fabs.f64 a1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 a1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 a1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 a1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 a1))) (neg.f64 (neg.f64 (fabs.f64 a1))))
(*.f64 (pow.f64 (fabs.f64 a1) #s(literal 1 binary64)) (pow.f64 (fabs.f64 a1) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 a1) #s(literal 1 binary64)) (fabs.f64 a1))
(*.f64 (pow.f64 (neg.f64 a1) #s(literal 1 binary64)) (pow.f64 (neg.f64 a1) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 a1) #s(literal 1 binary64)) (neg.f64 a1))
(*.f64 (pow.f64 a1 (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 a1 (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 a1)) (neg.f64 (fabs.f64 a1)))
(*.f64 (pow.f64 a1 #s(literal 1 binary64)) (pow.f64 a1 #s(literal 1 binary64)))
(*.f64 (pow.f64 a1 #s(literal 1 binary64)) a1)
(*.f64 (fabs.f64 a1) (fabs.f64 a1))
(*.f64 (neg.f64 a1) (neg.f64 a1))
(*.f64 a1 a1)
(pow.f64 (neg.f64 (fabs.f64 a1)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 a1) #s(literal 2 binary64))
(pow.f64 (neg.f64 a1) #s(literal 2 binary64))
(pow.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(pow.f64 a1 #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 a1) #s(literal 1 binary64)) (pow.f64 (fabs.f64 a1) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 a1) #s(literal 1 binary64)) (pow.f64 (neg.f64 a1) #s(literal -1 binary64)))
(/.f64 (pow.f64 a1 #s(literal 1 binary64)) (pow.f64 a1 #s(literal -1 binary64)))
(neg.f64 (*.f64 (neg.f64 a1) a1))
(sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))
(fabs.f64 (*.f64 (neg.f64 a1) a1))
(fabs.f64 (*.f64 a1 a1))
(exp.f64 (*.f64 (log.f64 (fabs.f64 a1)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 a1)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64)))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (fabs.f64 a1))) (neg.f64 (fabs.f64 a1)))
(*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (fabs.f64 a1) (cos.f64 th)) (*.f64 (fabs.f64 a1) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (fabs.f64 a1) (cos.f64 th)) (/.f64 (fabs.f64 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (fabs.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (fabs.f64 a1))
(*.f64 (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1))
(*.f64 (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(*.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (*.f64 (neg.f64 a1) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (neg.f64 a1) (cos.f64 th)) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a1))
(*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 a1)) (*.f64 (neg.f64 (fabs.f64 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) a1)
(*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(*.f64 (neg.f64 (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 (neg.f64 (cos.f64 th)) (/.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (fabs.f64 a1) (*.f64 (fabs.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a1 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(*.f64 (cos.f64 th) (*.f64 a1 (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) a1)))
(neg.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
a2
(*.f64 (pow.f64 (fabs.f64 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 a2))) (neg.f64 (neg.f64 (fabs.f64 a2))))
(*.f64 (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)) (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)) (fabs.f64 a2))
(*.f64 (pow.f64 (neg.f64 a2) #s(literal 1 binary64)) (pow.f64 (neg.f64 a2) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 a2) #s(literal 1 binary64)) (neg.f64 a2))
(*.f64 (pow.f64 a2 (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 a2 (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 a2)) (neg.f64 (fabs.f64 a2)))
(*.f64 (pow.f64 a2 #s(literal 1 binary64)) (pow.f64 a2 #s(literal 1 binary64)))
(*.f64 (pow.f64 a2 #s(literal 1 binary64)) a2)
(*.f64 (fabs.f64 a2) (fabs.f64 a2))
(*.f64 (neg.f64 a2) (neg.f64 a2))
(*.f64 a2 a2)
(pow.f64 (neg.f64 (fabs.f64 a2)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 a2) #s(literal 2 binary64))
(pow.f64 (neg.f64 a2) #s(literal 2 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(pow.f64 a2 #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)) (pow.f64 (fabs.f64 a2) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 a2) #s(literal 1 binary64)) (pow.f64 (neg.f64 a2) #s(literal -1 binary64)))
(/.f64 (pow.f64 a2 #s(literal 1 binary64)) (pow.f64 a2 #s(literal -1 binary64)))
(neg.f64 (*.f64 (neg.f64 a2) a2))
(sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))
(fabs.f64 (*.f64 (neg.f64 a2) a2))
(fabs.f64 (*.f64 a2 a2))
(exp.f64 (*.f64 (log.f64 (fabs.f64 a2)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 a2)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64)))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (fabs.f64 a2))) (neg.f64 (fabs.f64 a2)))
(*.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (fabs.f64 a2) (cos.f64 th)) (*.f64 (fabs.f64 a2) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (fabs.f64 a2) (cos.f64 th)) (/.f64 (fabs.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a2)) (neg.f64 (fabs.f64 a2)))
(*.f64 (*.f64 (fabs.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (fabs.f64 a2))
(*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(*.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (*.f64 (neg.f64 a2) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 (cos.f64 th)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a2))
(*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (neg.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a2))
(*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 a2)) (*.f64 (neg.f64 (fabs.f64 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2)
(*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(*.f64 (neg.f64 (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (neg.f64 (cos.f64 th)) (/.f64 (*.f64 a2 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (fabs.f64 a2) (*.f64 (fabs.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a2 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (cos.f64 th) (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal -1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2)))
(neg.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(*.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (neg.f64 (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 (cos.f64 th)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(*.f64 (neg.f64 (cos.f64 th)) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (neg.f64 (cos.f64 th)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) #s(literal -2 binary64))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (neg.f64 (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(neg.f64 (*.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(neg.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
(neg.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (*.f64 (*.f64 (cos.f64 th) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (*.f64 (*.f64 (cos.f64 th) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))

eval77.0ms (1.5%)

Memory
-38.8MiB live, 548.0MiB allocated; 22ms collecting garbage
Compiler

Compiled 11 514 to 1 758 computations (84.7% saved)

prune22.0ms (0.4%)

Memory
-2.2MiB live, 190.8MiB allocated; 5ms collecting garbage
Pruning

13 alts after pruning (13 fresh and 0 done)

PrunedKeptTotal
New35813371
Fresh000
Picked101
Done000
Total35913372
Accuracy
100.0%
Counts
372 → 13
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.6%
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
99.3%
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) #s(literal 2 binary64))
99.3%
(/.f64 (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)))) #s(literal 2 binary64))
99.6%
(/.f64 (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
99.6%
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
98.8%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
99.6%
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
67.3%
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
99.6%
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
99.6%
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
99.5%
(*.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
99.2%
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1/2 binary64))
99.6%
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
Compiler

Compiled 466 to 344 computations (26.2% saved)

sample0.0ms (0.0%)

Memory
3.6MiB live, 3.6MiB allocated; 0ms collecting garbage
Calls
Call 1
Inputs
2
(sqrt 2)
1
Outputs
#s(literal 2 binary64)
#s(literal 6369051672525773/4503599627370496 binary64)
#s(literal 1 binary64)
Samples
0.0ms0valid
Compiler

Compiled 6 to 5 computations (16.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 0.0ms
adjust: 0.0ms (0.0% of total)

series163.0ms (3.1%)

Memory
28.6MiB live, 747.1MiB allocated; 26ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
05504136
Stop Event
iter-limit
Counts
34 → 113
Calls
Call 1
Inputs
th
(cos.f64 th)
#s(literal 2 binary64)
(sqrt.f64 #s(literal 2 binary64))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
a1
(*.f64 a1 a1)
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
a2
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 (/.f64 a2 (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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
#s(literal 1 binary64)
#s(approx (cos th) #s(literal 1 binary64))
(/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(*.f64 a2 a2)
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(*.f64 a1 (cos.f64 th))
(*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a2 (cos.f64 th))
(neg.f64 a2)
(*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)))
(-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)))) #s(literal 2 binary64))
Outputs
#s(approx a1 a1)
#s(approx (* a1 a1) (pow.f64 a1 #s(literal 2 binary64)))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (* a2 (/ a2 (sqrt 2))) (cos th))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (* a2 (/ a2 (sqrt 2))) (cos th))) (+.f64 (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64)))
#s(approx (+ (* a2 a2) (* a1 a1)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (/ (sqrt 2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (/ (sqrt 2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)))))
#s(approx (/ (sqrt 2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (+.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a2 #s(literal 6 binary64)) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (cos.f64 th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)))))
#s(approx (/ (sqrt 2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (+.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a2 #s(literal 8 binary64)) (cos.f64 th)))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal 6 binary64)) (cos.f64 th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (cos.f64 th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)))))
#s(approx (* a1 (cos th)) (*.f64 a1 (cos.f64 th)))
#s(approx (* a1 (sqrt 2)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* a1 (cos th)) (* a1 (sqrt 2))) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (- (* (* a1 (cos th)) (* a1 (sqrt 2))) (* (sqrt 2) (* (* a2 (cos th)) (neg a2)))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (- (* (* a1 (cos th)) (* a1 (sqrt 2))) (* (sqrt 2) (* (* a2 (cos th)) (neg a2)))) (-.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (/ (- (* (* a1 (cos th)) (* a1 (sqrt 2))) (* (sqrt 2) (* (* a2 (cos th)) (neg a2)))) 2) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (- (* (* a1 (cos th)) (* a1 (sqrt 2))) (* (sqrt 2) (* (* a2 (cos th)) (neg a2)))) 2) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (* a2 (/ a2 (sqrt 2))) (cos th))) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 2 binary64))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (cos.f64 th) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (pow.f64 a1 #s(literal 2 binary64))))))
#s(approx (/ (sqrt 2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (/ (sqrt 2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (/ (sqrt 2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (/.f64 (-.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (cos.f64 th)))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)))) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (/ (sqrt 2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a1 #s(literal 6 binary64)) (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (cos.f64 th)))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th))))) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (- (* (* a1 (cos th)) (* a1 (sqrt 2))) (* (sqrt 2) (* (* a2 (cos th)) (neg a2)))) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 a1 #s(literal 2 binary64))))))
#s(approx (/ (- (* (* a1 (cos th)) (* a1 (sqrt 2))) (* (sqrt 2) (* (* a2 (cos th)) (neg a2)))) 2) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (- (* (* a1 (cos th)) (* a1 (sqrt 2))) (* (sqrt 2) (* (* a2 (cos th)) (neg a2)))) 2) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 a1 #s(literal 2 binary64)))))))
#s(approx a2 a2)
#s(approx (/ a2 (sqrt 2)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* a2 (/ a2 (sqrt 2))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (sqrt 2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)))))
#s(approx (/ (sqrt 2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (+.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a1 #s(literal 6 binary64)) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (cos.f64 th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)))))
#s(approx (/ (sqrt 2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (+.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a1 #s(literal 8 binary64)) (cos.f64 th)))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 6 binary64)) (cos.f64 th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (cos.f64 th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)))))
#s(approx (* a2 (cos th)) (*.f64 a2 (cos.f64 th)))
#s(approx (neg a2) (*.f64 #s(literal -1 binary64) a2))
#s(approx (* (* a2 (cos th)) (neg a2)) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (* (sqrt 2) (* (* a2 (cos th)) (neg a2))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (- (* (* a1 (cos th)) (* a1 (sqrt 2))) (* (sqrt 2) (* (* a2 (cos th)) (neg a2)))) (+.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (* a2 (/ a2 (sqrt 2))) (cos th))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 (cos.f64 th) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (/ (sqrt 2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (/ (sqrt 2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (/.f64 (-.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (cos.f64 th)))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)))) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (/ (sqrt 2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a2 #s(literal 6 binary64)) (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (cos.f64 th)))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th))))) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (- (* (* a1 (cos th)) (* a1 (sqrt 2))) (* (sqrt 2) (* (* a2 (cos th)) (neg a2)))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 a2 #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (/ (- (* (* a1 (cos th)) (* a1 (sqrt 2))) (* (sqrt 2) (* (* a2 (cos th)) (neg a2)))) 2) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 a2 #s(literal 2 binary64)))))))
#s(approx th th)
#s(approx (cos th) #s(literal 1 binary64))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 th #s(literal 2 binary64)))))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (cos th) (sqrt 2)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* a2 (/ a2 (sqrt 2))) (cos th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* a2 (/ a2 (sqrt 2))) (cos th)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* a2 (/ a2 (sqrt 2))) (cos th)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (* a2 (/ a2 (sqrt 2))) (cos th))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (* a2 (/ a2 (sqrt 2))) (cos th))) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (* a2 (/ a2 (sqrt 2))) (cos th))) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (/ (cos th) (sqrt 2)) (* a1 a1)) (* (* a2 (/ a2 (sqrt 2))) (cos th))) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (* a2 a2) (* a1 a1))) (/.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (* a2 a2) (* a1 a1))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (* a2 a2) (* a1 a1))) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (* a2 a2) (* a1 a1))) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))) (*.f64 #s(literal 1/24 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))))) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (/ (sqrt 2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (/ (sqrt 2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (/ (sqrt 2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (/ (sqrt 2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/48 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (* a1 (cos th)) (+.f64 a1 (*.f64 #s(literal -1/2 binary64) (*.f64 a1 (pow.f64 th #s(literal 2 binary64))))))
#s(approx (* a1 (cos th)) (+.f64 a1 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) a1) (*.f64 #s(literal 1/24 binary64) (*.f64 a1 (pow.f64 th #s(literal 2 binary64))))))))
#s(approx (* a1 (cos th)) (+.f64 a1 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) a1) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 a1 (pow.f64 th #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) a1)))))))
#s(approx (* (* a1 (cos th)) (* a1 (sqrt 2))) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* a1 (cos th)) (* a1 (sqrt 2))) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (*.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* a1 (cos th)) (* a1 (sqrt 2))) (+.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (*.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (* a1 (cos th)) (* a1 (sqrt 2))) (+.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (*.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* a2 (cos th)) (+.f64 a2 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 (pow.f64 th #s(literal 2 binary64))))))
#s(approx (* a2 (cos th)) (+.f64 a2 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) a2) (*.f64 #s(literal 1/24 binary64) (*.f64 a2 (pow.f64 th #s(literal 2 binary64))))))))
#s(approx (* a2 (cos th)) (+.f64 a2 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) a2) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 a2 (pow.f64 th #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) a2)))))))
#s(approx (* (* a2 (cos th)) (neg a2)) (*.f64 #s(literal -1 binary64) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (* (* a2 (cos th)) (neg a2)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 a2 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))))))
#s(approx (* (* a2 (cos th)) (neg a2)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 a2 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 a2 #s(literal 2 binary64)))))))
#s(approx (* (* a2 (cos th)) (neg a2)) (+.f64 (*.f64 #s(literal -1 binary64) (pow.f64 a2 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 a2 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/24 binary64) (pow.f64 a2 #s(literal 2 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))))))))))
#s(approx (* (sqrt 2) (* (* a2 (cos th)) (neg a2))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (sqrt 2) (* (* a2 (cos th)) (neg a2))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (sqrt 2) (* (* a2 (cos th)) (neg a2))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* (sqrt 2) (* (* a2 (cos th)) (neg a2))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (- (* (* a1 (cos th)) (* a1 (sqrt 2))) (* (sqrt 2) (* (* a2 (cos th)) (neg a2)))) (-.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (- (* (* a1 (cos th)) (* a1 (sqrt 2))) (* (sqrt 2) (* (* a2 (cos th)) (neg a2)))) (-.f64 (+.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (- (* (* a1 (cos th)) (* a1 (sqrt 2))) (* (sqrt 2) (* (* a2 (cos th)) (neg a2)))) (-.f64 (+.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (- (* (* a1 (cos th)) (* a1 (sqrt 2))) (* (sqrt 2) (* (* a2 (cos th)) (neg a2)))) (-.f64 (+.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (- (* (* a1 (cos th)) (* a1 (sqrt 2))) (* (sqrt 2) (* (* a2 (cos th)) (neg a2)))) 2) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (/ (- (* (* a1 (cos th)) (* a1 (sqrt 2))) (* (sqrt 2) (* (* a2 (cos th)) (neg a2)))) 2) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (/ (- (* (* a1 (cos th)) (* a1 (sqrt 2))) (* (sqrt 2) (* (* a2 (cos th)) (neg a2)))) 2) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (/ (- (* (* a1 (cos th)) (* a1 (sqrt 2))) (* (sqrt 2) (* (* a2 (cos th)) (neg a2)))) 2) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (cos th) (cos.f64 th))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (* a2 a2) (* a1 a1))) (/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (/ (sqrt 2) (* (+ (* a2 a2) (* a1 a1)) (cos th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (/ (- (* (* a1 (cos th)) (* a1 (sqrt 2))) (* (sqrt 2) (* (* a2 (cos th)) (neg a2)))) 2) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
Calls

9 calls:

TimeVariablePoint
36.0ms
a1
inf
32.0ms
a1
0
10.0ms
a2
0
7.0ms
th
inf
7.0ms
a2
inf

rewrite390.0ms (7.5%)

Memory
4.9MiB live, 2 765.7MiB allocated; 104ms collecting garbage
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
035263
063262
1262235
21222231
04149231
Stop Event
iter-limit
node-limit
iter-limit
Counts
34 → 1 734
Calls
Call 1
Inputs
th
(cos.f64 th)
#s(literal 2 binary64)
(sqrt.f64 #s(literal 2 binary64))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
a1
(*.f64 a1 a1)
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
a2
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 (/.f64 a2 (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 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
#s(literal 1 binary64)
#s(approx (cos th) #s(literal 1 binary64))
(/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(*.f64 a2 a2)
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(*.f64 a1 (cos.f64 th))
(*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a2 (cos.f64 th))
(neg.f64 a2)
(*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)))
(-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)))) #s(literal 2 binary64))
Outputs
th
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) (*.f64 (sin.f64 th) #s(literal 0 binary64)))) (*.f64 (sin.f64 th) #s(literal 0 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (sin.f64 th) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64)))) (-.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (sin.f64 th) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64))))))
(neg.f64 (neg.f64 (cos.f64 th)))
(sin.f64 (neg.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) th) (PI.f64))))
(sin.f64 (+.f64 (neg.f64 (neg.f64 th)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 th)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) th)) (PI.f64)))
(sin.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) th) (PI.f64)) (PI.f64)))
(sin.f64 (+.f64 (neg.f64 th) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 th) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) th))
(-.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (neg.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64))))
(-.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (cos.f64 th) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 th))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 th))))
(cos.f64 (+.f64 (neg.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) th)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) th) (PI.f64)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(cos.f64 (+.f64 (+.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) th) (*.f64 (PI.f64) #s(literal 1/2 binary64))) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (neg.f64 th) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 (fabs.f64 th) (PI.f64)) (PI.f64)))
(cos.f64 (+.f64 (+.f64 th (PI.f64)) (PI.f64)))
(cos.f64 (neg.f64 (neg.f64 th)))
(cos.f64 (neg.f64 (fabs.f64 th)))
(cos.f64 (neg.f64 th))
(cos.f64 (fabs.f64 th))
(cos.f64 th)
(+.f64 (*.f64 (sin.f64 (neg.f64 th)) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 th)) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 #s(literal 0 binary64) (sin.f64 th)))
(+.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
#s(literal 2 binary64)
(*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 #s(literal 2 binary64) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(cosh.f64 (asinh.f64 #s(literal 1 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(fabs.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(fabs.f64 (sqrt.f64 #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (neg.f64 (cos.f64 th)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (cos.f64 th) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (cos.f64 th) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 (neg.f64 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
a1
(*.f64 (pow.f64 (fabs.f64 a1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 a1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 a1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 a1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 a1))) (neg.f64 (neg.f64 (fabs.f64 a1))))
(*.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (neg.f64 (neg.f64 a1))))
(*.f64 (pow.f64 (fabs.f64 a1) #s(literal 1 binary64)) (pow.f64 (fabs.f64 a1) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 a1) #s(literal 1 binary64)) (fabs.f64 a1))
(*.f64 (pow.f64 (neg.f64 a1) #s(literal 1 binary64)) (pow.f64 (neg.f64 a1) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 a1) #s(literal 1 binary64)) (neg.f64 a1))
(*.f64 (pow.f64 a1 (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 a1 (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 a1)) (neg.f64 (fabs.f64 a1)))
(*.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 a1)))
(*.f64 (pow.f64 a1 #s(literal 1 binary64)) (pow.f64 a1 #s(literal 1 binary64)))
(*.f64 (pow.f64 a1 #s(literal 1 binary64)) a1)
(*.f64 (fabs.f64 a1) (fabs.f64 a1))
(*.f64 (neg.f64 a1) (neg.f64 a1))
(*.f64 a1 a1)
(pow.f64 (neg.f64 (fabs.f64 a1)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 a1)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 a1) #s(literal 2 binary64))
(pow.f64 (neg.f64 a1) #s(literal 2 binary64))
(pow.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(pow.f64 a1 #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 a1) #s(literal 1 binary64)) (pow.f64 (fabs.f64 a1) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 a1) #s(literal 1 binary64)) (pow.f64 (neg.f64 a1) #s(literal -1 binary64)))
(/.f64 (pow.f64 a1 #s(literal 1 binary64)) (pow.f64 a1 #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 a1) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 a1) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 a1 #s(literal -2 binary64)))
(neg.f64 (*.f64 (neg.f64 a1) a1))
(sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))
(fabs.f64 (*.f64 (neg.f64 a1) a1))
(fabs.f64 (*.f64 a1 a1))
(exp.f64 (*.f64 (log.f64 (fabs.f64 a1)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 a1)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64)))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a1)) (fabs.f64 a1))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1))
(*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fabs.f64 a1) (*.f64 (fabs.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a1 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(*.f64 (cos.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 (cos.f64 th) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) a1)))
a2
(*.f64 (*.f64 a2 #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) a2)
(*.f64 (neg.f64 a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a2 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 a2 #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 a2 #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) a2))
(/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (/.f64 a2 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 (neg.f64 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fabs.f64 a2) (/.f64 (fabs.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (neg.f64 a2) (/.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2)
(*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (*.f64 a2 a2))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a2 (neg.f64 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 a2 a2) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (neg.f64 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a2) a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a2 a2)))
(fabs.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(fabs.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a2)) (fabs.f64 a2))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2))
(*.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) a2) a2)
(*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a2)
(*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fabs.f64 a2) (*.f64 (fabs.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 a2) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2) (cos.f64 th))
(*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 (cos.f64 th)))
(*.f64 a2 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 (cos.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (cos.f64 th) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (cos.f64 th))
(*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal -1 binary64)))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/4 binary64))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1/2 binary64))
(*.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) #s(literal 1 binary64))
(*.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 (cos.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal -2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal -2 binary64))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)))) (-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))))) (-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1))) (+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))) (+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))) #s(literal -4 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 th) #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (cos.f64 th)) (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))) (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 4 binary64))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 #s(literal -2 binary64) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -2 binary64))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(neg.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (-.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1/2 binary64)))
(neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64)))
(-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))
(-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal -2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th))))
(-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))))
(-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) #s(literal -1 binary64)))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (cos.f64 th))) #s(literal -2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (neg.f64 (*.f64 a1 (cos.f64 th))) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (neg.f64 a1) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) #s(literal -2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (cos.f64 th))) (*.f64 (neg.f64 a2) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) (/.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) a1))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 a1)))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1)))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (cos.f64 th))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) (neg.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
#s(literal 1 binary64)
#s(approx (cos th) #s(literal 1 binary64))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) #s(literal 1 binary64)))
(*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) #s(literal 1 binary64))))
(neg.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a1)) (fabs.f64 a1))
(*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1))
(*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fabs.f64 a1) (*.f64 (fabs.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a1 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a1 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))
(*.f64 (pow.f64 (fabs.f64 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 a2))) (neg.f64 (neg.f64 (fabs.f64 a2))))
(*.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 a2))))
(*.f64 (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)) (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)) (fabs.f64 a2))
(*.f64 (pow.f64 (neg.f64 a2) #s(literal 1 binary64)) (pow.f64 (neg.f64 a2) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 a2) #s(literal 1 binary64)) (neg.f64 a2))
(*.f64 (pow.f64 a2 (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 a2 (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 a2)) (neg.f64 (fabs.f64 a2)))
(*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)))
(*.f64 (pow.f64 a2 #s(literal 1 binary64)) (pow.f64 a2 #s(literal 1 binary64)))
(*.f64 (pow.f64 a2 #s(literal 1 binary64)) a2)
(*.f64 (fabs.f64 a2) (fabs.f64 a2))
(*.f64 (neg.f64 a2) (neg.f64 a2))
(*.f64 a2 a2)
(pow.f64 (neg.f64 (fabs.f64 a2)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 a2)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 a2) #s(literal 2 binary64))
(pow.f64 (neg.f64 a2) #s(literal 2 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(pow.f64 a2 #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)) (pow.f64 (fabs.f64 a2) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 a2) #s(literal 1 binary64)) (pow.f64 (neg.f64 a2) #s(literal -1 binary64)))
(/.f64 (pow.f64 a2 #s(literal 1 binary64)) (pow.f64 a2 #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 a2) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 a2) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 a2 #s(literal -2 binary64)))
(neg.f64 (*.f64 a2 (neg.f64 a2)))
(neg.f64 (*.f64 (neg.f64 a2) a2))
(sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))
(fabs.f64 (*.f64 a2 (neg.f64 a2)))
(fabs.f64 (*.f64 (neg.f64 a2) a2))
(fabs.f64 (neg.f64 (*.f64 a2 a2)))
(fabs.f64 (*.f64 a2 a2))
(exp.f64 (*.f64 (log.f64 (fabs.f64 a2)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 a2)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64)))
(*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a2)) (fabs.f64 a2))
(*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2))
(*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2)
(*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fabs.f64 a2) (*.f64 (fabs.f64 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) a2))
(*.f64 a2 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 1/2 binary64))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) #s(literal 1/2 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (neg.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))) (-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1))) (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))) (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (-.f64 (*.f64 (neg.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (neg.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) #s(literal -2 binary64))
(/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))) (+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (+.f64 (*.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))))
(neg.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (-.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (-.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (neg.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(+.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 2 binary64)))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))) a1))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1)))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))))
(+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (neg.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a2))) (fabs.f64 a2)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (neg.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2))) (neg.f64 a2)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (neg.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) a2)) a2))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (neg.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) a2))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (neg.f64 (neg.f64 (*.f64 a2 a2))) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a2)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 a2 a2))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (*.f64 a2 a2))) (*.f64 a2 a2))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1))) (*.f64 a1 a1))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2)) (*.f64 a1 a1))) (*.f64 a1 a1))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)) (*.f64 a1 a1))) (*.f64 a1 a1))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 a2) a2) (*.f64 a1 a1))) (*.f64 a1 a1))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 a2 a2)) (*.f64 a1 a1))) (*.f64 a1 a1))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a1 a1))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2))) (*.f64 a2 a2))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 a2 a2))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (*.f64 (neg.f64 (neg.f64 a1)) a1))) (-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a2 (neg.f64 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (neg.f64 a2))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2)) (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)) (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 a2) a2))) (+.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (neg.f64 (*.f64 a2 a2)) (neg.f64 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (neg.f64 (*.f64 a2 a2))))
(/.f64 (+.f64 (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (*.f64 (neg.f64 (neg.f64 a1)) a1)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1)))))
(/.f64 (-.f64 (pow.f64 (*.f64 a1 a1) #s(literal 3 binary64)) (pow.f64 (*.f64 a2 (neg.f64 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (+.f64 (*.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a2 (neg.f64 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a2 (neg.f64 a2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 a1 a1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (+.f64 (*.f64 (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2)) (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2))) (*.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 a1 a1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (+.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)) (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2))) (*.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 a1 a1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 a2) a2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (+.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 a2) a2)) (*.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 a1 a1) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (neg.f64 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (neg.f64 (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 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 (*.f64 (neg.f64 a1) a1) (*.f64 (neg.f64 a1) a1))) (+.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1)))
(/.f64 (+.f64 (pow.f64 (*.f64 a1 a1) #s(literal 3 binary64)) (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 a1) a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 (neg.f64 a1) a1)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (+.f64 (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64)) (pow.f64 (*.f64 a1 a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(neg.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)))
(-.f64 (*.f64 a2 a2) (neg.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1)))
(-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))
(-.f64 (*.f64 a1 a1) (*.f64 a2 (neg.f64 a2)))
(-.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2)))
(-.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)))
(-.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2))
(-.f64 (*.f64 a1 a1) (neg.f64 (*.f64 a2 a2)))
(+.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 (fabs.f64 a1))) (fabs.f64 a1)))
(+.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 a1)))
(+.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(+.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (neg.f64 (fabs.f64 a2))) (fabs.f64 a2)))
(+.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 a2)))
(+.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (neg.f64 a2)) a2))
(+.f64 (*.f64 a1 a1) (neg.f64 (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2))))
(+.f64 (*.f64 a1 a1) (neg.f64 (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2))))
(+.f64 (*.f64 a1 a1) (neg.f64 (neg.f64 (*.f64 a2 a2))))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (cos.f64 th))
(*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal -1 binary64)))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/4 binary64))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1/2 binary64))
(*.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) #s(literal 1 binary64))
(*.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 (cos.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal -2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal -2 binary64))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)))) (-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))))) (-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1))) (+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))) (+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))) #s(literal -4 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 th) #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (cos.f64 th)) (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))) (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 4 binary64))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 #s(literal -2 binary64) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -2 binary64))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(neg.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (-.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1/2 binary64)))
(neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64)))
(-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))
(-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal -2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th))))
(-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))))
(-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) #s(literal -1 binary64)))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (cos.f64 th))) #s(literal -2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (neg.f64 (*.f64 a1 (cos.f64 th))) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (neg.f64 a1) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) #s(literal -2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (cos.f64 th))) (*.f64 (neg.f64 a2) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) (/.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) a1))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 a1)))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1)))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (cos.f64 th))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) (neg.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (-.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a1 (cos.f64 th)) a1)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 a2) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)))) (+.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a1 (cos.f64 th)) a1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 a2) (cos.f64 th))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))))))
(neg.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)))
(-.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)))
(-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th))))
(-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)))
(+.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(+.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (cos.f64 th))) a2))
(+.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (neg.f64 (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))
(+.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (neg.f64 a2)))
(+.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (cos.f64 th))))
(+.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 (neg.f64 a2))))
(+.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 a2) (cos.f64 th)))
(+.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))))
(+.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(*.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th))))
(*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)))
(/.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)))
(/.f64 (neg.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))) (cos.f64 th))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (neg.f64 (cos.f64 th)))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))
(/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (cos.f64 th))
(/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (cos.f64 th))
(*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal -1 binary64)))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/4 binary64))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1/2 binary64))
(*.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) #s(literal 1 binary64))
(*.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 (cos.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal -2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal -2 binary64))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)))) (-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))))) (-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1))) (+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))) (+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))) #s(literal -4 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 th) #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (cos.f64 th)) (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))) (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 4 binary64))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 #s(literal -2 binary64) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -2 binary64))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(neg.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (-.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1/2 binary64)))
(neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64)))
(-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))
(-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal -2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th))))
(-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))))
(-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) #s(literal -1 binary64)))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (cos.f64 th))) #s(literal -2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (neg.f64 (*.f64 a1 (cos.f64 th))) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (neg.f64 a1) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) #s(literal -2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (cos.f64 th))) (*.f64 (neg.f64 a2) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) (/.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) a1))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 a1)))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1)))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (cos.f64 th))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) (neg.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a1 (cos.f64 th))
(*.f64 (cos.f64 th) a1)
(*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) a1)
(*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))
(*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) a1)
(*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (cos.f64 th)))
(*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a1 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 (cos.f64 th))))
(*.f64 a1 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 (cos.f64 th)) a1))
(*.f64 (cos.f64 th) (*.f64 a1 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a2 (cos.f64 th))
(*.f64 (cos.f64 th) a2)
(neg.f64 a2)
(*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))
(*.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) a2)
(*.f64 (neg.f64 a2) (*.f64 a2 (cos.f64 th)))
(*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2))
(*.f64 a2 (*.f64 (neg.f64 a2) (cos.f64 th)))
(*.f64 (cos.f64 th) (*.f64 a2 (neg.f64 a2)))
(neg.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a2)) (*.f64 a2 (cos.f64 th)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 (neg.f64 a2) (cos.f64 th)))
(*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (cos.f64 th)) (neg.f64 a2))
(*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (neg.f64 a2) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (cos.f64 th)))
(*.f64 (*.f64 a2 (cos.f64 th)) (*.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a2 (*.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)))
(neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (cos.f64 th)) a2))
(neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2)))
(neg.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th)))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th)))) (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))) (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (*.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th)))) (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th)))))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (+.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th)))) (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))) (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th)))) (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))))
(neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th))))
(-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))))
(-.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2)))
(-.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))))
(-.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th)))))
(-.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 a2))) (*.f64 a2 (cos.f64 th))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2)) (*.f64 (neg.f64 a2) (cos.f64 th))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (neg.f64 (neg.f64 a2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (cos.f64 th))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (*.f64 (neg.f64 a2) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (neg.f64 a2) (*.f64 (*.f64 (neg.f64 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (neg.f64 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (neg.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (cos.f64 th)) a2))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2)))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (cos.f64 th))
(*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal -1 binary64)))
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/4 binary64))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1/2 binary64))
(*.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) #s(literal 1 binary64))
(*.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(*.f64 (cos.f64 th) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal -2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal -2 binary64))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 2 binary64))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))) (-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)))) (-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))))) (-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1))) (+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))) (+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 (cos.f64 th))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))))) #s(literal -4 binary64))
(/.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (cos.f64 th) #s(literal 2 binary64)) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (cos.f64 th)) (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64))) #s(literal -2 binary64))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))) (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 4 binary64))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (cos.f64 th)) (neg.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 #s(literal -2 binary64) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -2 binary64))
(/.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 (cos.f64 th)) a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(/.f64 (cos.f64 th) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(neg.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (-.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (-.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal -1/2 binary64)))
(neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal 2 binary64)) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 4 binary64)))
(-.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(-.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))
(-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) a1) (cos.f64 th)) #s(literal -2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) #s(literal 2 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th))))
(-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))))
(-.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) #s(literal -1 binary64)))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))) (/.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 (cos.f64 th))) #s(literal -2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (neg.f64 (*.f64 a1 (cos.f64 th))) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (/.f64 (*.f64 (neg.f64 a1) (*.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) #s(literal -2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (cos.f64 th))) (*.f64 (neg.f64 a2) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) #s(literal 1/2 binary64))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 a2 (cos.f64 th)) a2) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (cos.f64 th)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (*.f64 a2 (cos.f64 th))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))) (/.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))) a1))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 a1 a1)))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (neg.f64 (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))) a1)))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a2)) (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (cos.f64 th))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a2) (neg.f64 (*.f64 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (cos.f64 th)) (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (cos.f64 th)))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (neg.f64 a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))))
(+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))

eval209.0ms (4.0%)

Memory
3.3MiB live, 1 781.3MiB allocated; 86ms collecting garbage
Compiler

Compiled 39 910 to 4 783 computations (88.0% saved)

prune104.0ms (2.0%)

Memory
-18.1MiB live, 579.5MiB allocated; 18ms collecting garbage
Pruning

21 alts after pruning (21 fresh and 0 done)

PrunedKeptTotal
New1 399211 420
Fresh808
Picked505
Done000
Total1 412211 433
Accuracy
100.0%
Counts
1 433 → 21
Alt Table
Click to see full alt table
StatusAccuracyProgram
67.1%
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
99.3%
(/.f64 (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 #s(literal 6369051672525773/4503599627370496 binary64))) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)))) #s(literal 2 binary64))
99.6%
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
99.6%
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
67.4%
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
66.8%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
66.8%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
98.8%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
54.8%
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))
67.4%
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2)))
67.4%
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2))
67.0%
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
67.3%
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
99.2%
(+.f64 (*.f64 #s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
99.6%
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
99.5%
(*.f64 (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
99.6%
(*.f64 (/.f64 (cos.f64 th) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
67.3%
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
99.5%
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
67.3%
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
99.2%
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1/2 binary64))
Compiler

Compiled 834 to 594 computations (28.8% saved)

sample0.0ms (0.0%)

Memory
5.0MiB live, 5.0MiB allocated; 0ms collecting garbage
Calls
Call 1
Inputs
2
(sqrt 2)
1
(neg (sqrt 2))
(* (sqrt 2) (neg (sqrt 2)))
Outputs
#s(literal 2 binary64)
#s(literal 6369051672525773/4503599627370496 binary64)
#s(literal 1 binary64)
#s(literal -6369051672525773/4503599627370496 binary64)
#s(literal -2 binary64)
Samples
0.0ms0valid
Compiler

Compiled 15 to 7 computations (53.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 0.0ms
adjust: 0.0ms (0.0% of total)

series115.0ms (2.2%)

Memory
42.0MiB live, 1 219.1MiB allocated; 29ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
04853303
Stop Event
iter-limit
Counts
32 → 98
Calls
Call 1
Inputs
a2
(*.f64 a2 a2)
a1
(*.f64 a1 a1)
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
th
(cos.f64 th)
(*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))
#s(literal 2 binary64)
(sqrt.f64 #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
#s(literal 1 binary64)
#s(approx (cos th) #s(literal 1 binary64))
(/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(neg.f64 a1)
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1))
(*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1)
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)
(neg.f64 (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))
(-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
Outputs
#s(approx a1 a1)
#s(approx (* a1 a1) (pow.f64 a1 #s(literal 2 binary64)))
#s(approx (+ (* a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64)))
#s(approx (+ (* a2 a2) (* a1 a1)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (+.f64 (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (neg a1) (*.f64 #s(literal -1 binary64) a1))
#s(approx (* (/ (cos th) (sqrt 2)) (neg a1)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 a1 (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (/ (cos th) (sqrt 2)) (neg a1)) (neg a1)) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (cos th) a1) (*.f64 a1 (cos.f64 th)))
#s(approx (* (* (cos th) a1) a1) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)))
#s(approx (* (* (* (cos th) a1) a1) (neg (sqrt 2))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (- (* (* (* (cos th) a1) a1) (neg (sqrt 2))) (* (sqrt 2) (* (* (cos th) a2) a2))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (- (* (* (* (cos th) a1) a1) (neg (sqrt 2))) (* (sqrt 2) (* (* (cos th) a2) a2))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 2 binary64))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (cos.f64 th) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (pow.f64 a1 #s(literal 2 binary64))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (- (* (* (* (cos th) a1) a1) (neg (sqrt 2))) (* (sqrt 2) (* (* (cos th) a2) a2))) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 a1 #s(literal 2 binary64)))))))
#s(approx a2 a2)
#s(approx (* (cos th) a2) (*.f64 a2 (cos.f64 th)))
#s(approx (* (sqrt 2) (* (* (cos th) a2) a2)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (- (* (* (* (cos th) a1) a1) (neg (sqrt 2))) (* (sqrt 2) (* (* (cos th) a2) a2))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 (cos.f64 th) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (- (* (* (* (cos th) a1) a1) (neg (sqrt 2))) (* (sqrt 2) (* (* (cos th) a2) a2))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 a2 #s(literal 2 binary64)))) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx th th)
#s(approx (cos th) #s(literal 1 binary64))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 th #s(literal 2 binary64)))))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))) (*.f64 #s(literal 1/24 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))))) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (/.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (cos th) (sqrt 2)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (neg a1)) (*.f64 #s(literal -1 binary64) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (neg a1)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 a1 (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) (sqrt 2)) (neg a1)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/24 binary64) (/.f64 (*.f64 a1 (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* (/ (cos th) (sqrt 2)) (neg a1)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/24 binary64) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 a1 (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (* (* (/ (cos th) (sqrt 2)) (neg a1)) (neg a1)) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* (/ (cos th) (sqrt 2)) (neg a1)) (neg a1)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (/ (cos th) (sqrt 2)) (neg a1)) (neg a1)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (/ (cos th) (sqrt 2)) (neg a1)) (neg a1)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a2 a2)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (* (/ (cos th) (sqrt 2)) (neg a1)) (neg a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* (* (/ (cos th) (sqrt 2)) (neg a1)) (neg a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (* (/ (cos th) (sqrt 2)) (neg a1)) (neg a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (+ (* (* (/ (cos th) (sqrt 2)) (neg a1)) (neg a1)) (* (/ (cos th) (sqrt 2)) (* a2 a2))) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (cos th) a1) (+.f64 a1 (*.f64 #s(literal -1/2 binary64) (*.f64 a1 (pow.f64 th #s(literal 2 binary64))))))
#s(approx (* (cos th) a1) (+.f64 a1 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) a1) (*.f64 #s(literal 1/24 binary64) (*.f64 a1 (pow.f64 th #s(literal 2 binary64))))))))
#s(approx (* (cos th) a1) (+.f64 a1 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) a1) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 a1 (pow.f64 th #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) a1)))))))
#s(approx (* (* (cos th) a1) a1) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64)))) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (* (* (cos th) a1) a1) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64)))))) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (* (* (cos th) a1) a1) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (pow.f64 a1 #s(literal 2 binary64))))))) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (* (* (* (cos th) a1) a1) (neg (sqrt 2))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (* (cos th) a1) a1) (neg (sqrt 2))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (*.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (* (* (cos th) a1) a1) (neg (sqrt 2))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (*.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* (* (* (cos th) a1) a1) (neg (sqrt 2))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (*.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))))
#s(approx (* (cos th) a2) (+.f64 a2 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 (pow.f64 th #s(literal 2 binary64))))))
#s(approx (* (cos th) a2) (+.f64 a2 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) a2) (*.f64 #s(literal 1/24 binary64) (*.f64 a2 (pow.f64 th #s(literal 2 binary64))))))))
#s(approx (* (cos th) a2) (+.f64 a2 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) a2) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 a2 (pow.f64 th #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) a2)))))))
#s(approx (* (* (cos th) a2) a2) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64)))) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (* (* (cos th) a2) a2) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a2 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64)))))) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (* (* (cos th) a2) a2) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a2 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (pow.f64 a2 #s(literal 2 binary64))))))) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (* (sqrt 2) (* (* (cos th) a2) a2)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (sqrt 2) (* (* (cos th) a2) a2)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (sqrt 2) (* (* (cos th) a2) a2)) (+.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (sqrt 2) (* (* (cos th) a2) a2)) (+.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (- (* (* (* (cos th) a1) a1) (neg (sqrt 2))) (* (sqrt 2) (* (* (cos th) a2) a2))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (- (* (* (* (cos th) a1) a1) (neg (sqrt 2))) (* (sqrt 2) (* (* (cos th) a2) a2))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (- (* (* (* (cos th) a1) a1) (neg (sqrt 2))) (* (sqrt 2) (* (* (cos th) a2) a2))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (- (* (* (* (cos th) a1) a1) (neg (sqrt 2))) (* (sqrt 2) (* (* (cos th) a2) a2))) (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (- (* (* (* (cos th) a1) a1) (neg (sqrt 2))) (* (sqrt 2) (* (* (cos th) a2) a2))) (* (sqrt 2) (neg (sqrt 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))
#s(approx (/ (- (* (* (* (cos th) a1) a1) (neg (sqrt 2))) (* (sqrt 2) (* (* (cos th) a2) a2))) (* (sqrt 2) (neg (sqrt 2)))) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))
#s(approx (/ (- (* (* (* (cos th) a1) a1) (neg (sqrt 2))) (* (sqrt 2) (* (* (cos th) a2) a2))) (* (sqrt 2) (neg (sqrt 2)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))
#s(approx (/ (- (* (* (* (cos th) a1) a1) (neg (sqrt 2))) (* (sqrt 2) (* (* (cos th) a2) a2))) (* (sqrt 2) (neg (sqrt 2)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/720 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))))))
#s(approx (/ (sqrt 2) (cos th)) (sqrt.f64 #s(literal 2 binary64)))
#s(approx (/ (sqrt 2) (cos th)) (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ (sqrt 2) (cos th)) (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (/ (sqrt 2) (cos th)) (+.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/48 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (sqrt.f64 #s(literal 2 binary64))))))))) (+.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (cos th) (cos.f64 th))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) (sqrt 2)) (/.f64 (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (- (* (* (* (cos th) a1) a1) (neg (sqrt 2))) (* (sqrt 2) (* (* (cos th) a2) a2))) (* (sqrt 2) (neg (sqrt 2)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))
#s(approx (/ (sqrt 2) (cos th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
Calls

9 calls:

TimeVariablePoint
25.0ms
th
0
13.0ms
th
-inf
12.0ms
th
inf
8.0ms
a2
-inf
6.0ms
a1
0

rewrite262.0ms (5.0%)

Memory
-17.3MiB live, 2 301.8MiB allocated; 79ms collecting garbage
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
033265
059237
1228224
21141224
04065224
Stop Event
iter-limit
node-limit
iter-limit
Counts
32 → 1 219
Calls
Call 1
Inputs
a2
(*.f64 a2 a2)
a1
(*.f64 a1 a1)
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
th
(cos.f64 th)
(*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))
#s(literal 2 binary64)
(sqrt.f64 #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
#s(literal 1 binary64)
#s(approx (cos th) #s(literal 1 binary64))
(/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(neg.f64 a1)
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1))
(*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1)
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)
(neg.f64 (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))
(-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
Outputs
a2
(*.f64 (pow.f64 (fabs.f64 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 a2))) (neg.f64 (neg.f64 (fabs.f64 a2))))
(*.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 a2))))
(*.f64 (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)) (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)) (fabs.f64 a2))
(*.f64 (pow.f64 (neg.f64 a2) #s(literal 1 binary64)) (pow.f64 (neg.f64 a2) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 a2) #s(literal 1 binary64)) (neg.f64 a2))
(*.f64 (pow.f64 a2 (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 a2 (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 a2)) (neg.f64 (fabs.f64 a2)))
(*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)))
(*.f64 (pow.f64 a2 #s(literal 1 binary64)) (pow.f64 a2 #s(literal 1 binary64)))
(*.f64 (pow.f64 a2 #s(literal 1 binary64)) a2)
(*.f64 (fabs.f64 a2) (fabs.f64 a2))
(*.f64 (neg.f64 a2) (neg.f64 a2))
(*.f64 a2 a2)
(pow.f64 (neg.f64 (fabs.f64 a2)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 a2)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 a2) #s(literal 2 binary64))
(pow.f64 (neg.f64 a2) #s(literal 2 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(pow.f64 a2 #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)) (pow.f64 (fabs.f64 a2) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 a2) #s(literal 1 binary64)) (pow.f64 (neg.f64 a2) #s(literal -1 binary64)))
(/.f64 (pow.f64 a2 #s(literal 1 binary64)) (pow.f64 a2 #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 a2) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 a2) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 a2 #s(literal -2 binary64)))
(neg.f64 (*.f64 a2 (neg.f64 a2)))
(neg.f64 (*.f64 (neg.f64 a2) a2))
(sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))
(fabs.f64 (*.f64 a2 (neg.f64 a2)))
(fabs.f64 (*.f64 (neg.f64 a2) a2))
(fabs.f64 (neg.f64 (*.f64 a2 a2)))
(fabs.f64 (*.f64 a2 a2))
(exp.f64 (*.f64 (log.f64 (fabs.f64 a2)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 a2)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64)))
a1
(*.f64 (pow.f64 (fabs.f64 a1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 a1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 a1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 a1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 a1))) (neg.f64 (neg.f64 (fabs.f64 a1))))
(*.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (neg.f64 (neg.f64 a1))))
(*.f64 (pow.f64 (fabs.f64 a1) #s(literal 1 binary64)) (pow.f64 (fabs.f64 a1) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 a1) #s(literal 1 binary64)) (fabs.f64 a1))
(*.f64 (pow.f64 (neg.f64 a1) #s(literal 1 binary64)) (pow.f64 (neg.f64 a1) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 a1) #s(literal 1 binary64)) (neg.f64 a1))
(*.f64 (pow.f64 a1 (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 a1 (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 a1)) (neg.f64 (fabs.f64 a1)))
(*.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 a1)))
(*.f64 (pow.f64 a1 #s(literal 1 binary64)) (pow.f64 a1 #s(literal 1 binary64)))
(*.f64 (pow.f64 a1 #s(literal 1 binary64)) a1)
(*.f64 (fabs.f64 a1) (fabs.f64 a1))
(*.f64 (neg.f64 a1) (neg.f64 a1))
(*.f64 a1 a1)
(pow.f64 (neg.f64 (fabs.f64 a1)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 a1)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 a1) #s(literal 2 binary64))
(pow.f64 (neg.f64 a1) #s(literal 2 binary64))
(pow.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(pow.f64 a1 #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 a1) #s(literal 1 binary64)) (pow.f64 (fabs.f64 a1) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 a1) #s(literal 1 binary64)) (pow.f64 (neg.f64 a1) #s(literal -1 binary64)))
(/.f64 (pow.f64 a1 #s(literal 1 binary64)) (pow.f64 a1 #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 a1) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 a1) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 a1 #s(literal -2 binary64)))
(neg.f64 (*.f64 (neg.f64 a1) a1))
(sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))
(fabs.f64 (*.f64 (neg.f64 a1) a1))
(fabs.f64 (*.f64 a1 a1))
(exp.f64 (*.f64 (log.f64 (fabs.f64 a1)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 a1)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (*.f64 a2 a2))) (*.f64 a2 a2))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a1 a1))) (*.f64 a1 a1))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2)) (*.f64 a1 a1))) (*.f64 a1 a1))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)) (*.f64 a1 a1))) (*.f64 a1 a1))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 a2) a2) (*.f64 a1 a1))) (*.f64 a1 a1))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 a2 a2)) (*.f64 a1 a1))) (*.f64 a1 a1))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a1 a1))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2))) (*.f64 a2 a2))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 a2 a2))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (*.f64 (neg.f64 (neg.f64 a1)) a1))) (-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a2 (neg.f64 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 a2 (neg.f64 a2))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2)) (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)) (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)))) (+.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 a2) a2))) (+.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (neg.f64 (*.f64 a2 a2)) (neg.f64 (*.f64 a2 a2)))) (+.f64 (*.f64 a1 a1) (neg.f64 (*.f64 a2 a2))))
(/.f64 (+.f64 (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (*.f64 (neg.f64 (neg.f64 a1)) a1)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1)))))
(/.f64 (-.f64 (pow.f64 (*.f64 a1 a1) #s(literal 3 binary64)) (pow.f64 (*.f64 a2 (neg.f64 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (+.f64 (*.f64 (*.f64 a2 (neg.f64 a2)) (*.f64 a2 (neg.f64 a2))) (*.f64 (*.f64 a1 a1) (*.f64 a2 (neg.f64 a2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 a1 a1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (+.f64 (*.f64 (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2)) (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2))) (*.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 a1 a1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (+.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)) (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2))) (*.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 a1 a1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 a2) a2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (+.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 a2) a2)) (*.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 a1 a1) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (neg.f64 (*.f64 a2 a2))) (*.f64 (*.f64 a1 a1) (neg.f64 (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 (*.f64 a1 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 (*.f64 (neg.f64 a1) a1) (*.f64 (neg.f64 a1) a1))) (+.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1)))
(/.f64 (+.f64 (pow.f64 (*.f64 a1 a1) #s(literal 3 binary64)) (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 a1) a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 (neg.f64 a1) a1)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (+.f64 (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64)) (pow.f64 (*.f64 a1 a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(neg.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)))
(-.f64 (*.f64 a1 a1) (*.f64 a2 (neg.f64 a2)))
(-.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2)))
(-.f64 (*.f64 a1 a1) (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)))
(-.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2))
(-.f64 (*.f64 a1 a1) (neg.f64 (*.f64 a2 a2)))
(-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
th
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) (*.f64 (sin.f64 th) #s(literal 0 binary64)))) (*.f64 (sin.f64 th) #s(literal 0 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (sin.f64 th) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64)))) (-.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (sin.f64 th) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64))))))
(sin.f64 (+.f64 (neg.f64 (neg.f64 th)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 th)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 th) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 th) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) th))
(-.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (cos.f64 th) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 th))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 th))))
(cos.f64 (neg.f64 (neg.f64 th)))
(cos.f64 (neg.f64 (fabs.f64 th)))
(cos.f64 (neg.f64 th))
(cos.f64 (fabs.f64 th))
(cos.f64 th)
(+.f64 (*.f64 (sin.f64 (neg.f64 th)) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 th)) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 #s(literal 0 binary64) (sin.f64 th)))
(+.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (cos.f64 th)))) (*.f64 (*.f64 a1 a1) (cos.f64 th)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (-.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (-.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (cos.f64 th)))) (-.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (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 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (cos.f64 th))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (cos.f64 th))))))
(+.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 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))
(+.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (cos.f64 th)))
#s(literal 2 binary64)
(*.f64 (sqrt.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (sqrt.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 #s(literal 2 binary64) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(cosh.f64 (asinh.f64 #s(literal 1 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(fabs.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(fabs.f64 (sqrt.f64 #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))) (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a1 a1) (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 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (neg.f64 a1) a1) (/.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 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))))
(*.f64 (/.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (cos.f64 th)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 a1 a1) (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 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (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 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (neg.f64 (*.f64 a2 a2))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (neg.f64 a1) a1)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (neg.f64 a1) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))) (*.f64 (/.f64 (neg.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) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (neg.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 (neg.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 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))) (*.f64 (/.f64 (neg.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) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (*.f64 (neg.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 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.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))) (cos.f64 th))) (*.f64 (*.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))) (cos.f64 th)))) (-.f64 (*.f64 (/.f64 (*.f64 a1 a1) (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 (*.f64 (*.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))) (cos.f64 th))) (*.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))) (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (neg.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))))
(/.f64 (-.f64 (*.f64 (*.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))) (cos.f64 th))) (*.f64 (/.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.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))) (cos.f64 th))) (-.f64 (*.f64 (*.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))) (cos.f64 th))) (*.f64 (*.f64 (/.f64 (*.f64 a1 a1) (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 (pow.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.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))) (cos.f64 th))) (+.f64 (*.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))) (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (neg.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.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))) (cos.f64 th))) (+.f64 (*.f64 (/.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (neg.f64 (*.f64 a2 a2)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (neg.f64 (*.f64 a2 a2)))) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 a2 a2))) (*.f64 (/.f64 (neg.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) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (neg.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 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 a1 a1))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 a1 a1))) (*.f64 (/.f64 (neg.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) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 (neg.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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 a1 a1))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (+.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))))) (neg.f64 (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th)))))
(/.f64 (neg.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)))) (neg.f64 (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.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 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.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))) (cos.f64 th))) (*.f64 (*.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))) (cos.f64 th)))) (-.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.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))) (cos.f64 th))) (-.f64 (*.f64 (*.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))) (cos.f64 th))) (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (/.f64 (*.f64 a1 a1) (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 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1))) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th))) (neg.f64 (neg.f64 (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) (cos.f64 th)))
(/.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(neg.f64 (/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 a2 (neg.f64 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(-.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (/.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(-.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (neg.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(-.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(+.f64 (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (*.f64 a1 a1) (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 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th)))) (/.f64 (*.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th)))))
(+.f64 (/.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th)))) (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1)) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th)))))
(+.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (/.f64 (*.f64 a1 a1) (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 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
#s(literal 1 binary64)
#s(approx (cos th) #s(literal 1 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) #s(literal 1 binary64)))
(*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) #s(literal 1 binary64))))
(neg.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 #s(approx (cos th) #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(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))))) (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))) (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))) (-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64))) (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (-.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) a1))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) a1))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) a1))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) a1))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal -2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) #s(literal -2 binary64))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal -2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)))) (+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(neg.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1/2 binary64)))
(neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal -2 binary64)) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)))
(-.f64 (/.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -2 binary64)) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))) #s(literal 4 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)))
(-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (/.f64 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) #s(literal -2 binary64)))
(-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))))
(+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 a1)
(*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 (neg.f64 a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (neg.f64 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (neg.f64 a1))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))))
(neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a1)) (fabs.f64 a1))
(*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) a1)
(*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 (fabs.f64 a1) (*.f64 (fabs.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 a1))
(*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 (*.f64 a1 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a1 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))
(neg.f64 (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)))
(neg.f64 (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a2)) (fabs.f64 a2))
(*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2))
(*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (sqrt.f64 #s(literal 2 binary64))) a2)
(*.f64 (fabs.f64 a2) (*.f64 (fabs.f64 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a2 a2) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a2 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 #s(approx (cos th) #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(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))))) (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))) (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))) (-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64))) (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (-.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) a1))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) a1))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) a1))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) a1))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal -2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) #s(literal -2 binary64))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal -2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)))) (+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(neg.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1/2 binary64)))
(neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal -2 binary64)) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)))
(-.f64 (/.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -2 binary64)) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))) #s(literal 4 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)))
(-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (/.f64 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) #s(literal -2 binary64)))
(-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))))
(+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1)
(*.f64 a1 #s(approx (cos th) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fabs.f64 a1)) (fabs.f64 a1))
(*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) (neg.f64 a1))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 a1 a1))
(*.f64 (*.f64 a1 a1) #s(approx (cos th) #s(literal 1 binary64)))
(*.f64 a1 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1))
(neg.f64 (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1)) a1)
(*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))
(*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1))
(*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))
(*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 a1 (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 a1 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 a1 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))))
(neg.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)
(*.f64 a2 #s(approx (cos th) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fabs.f64 a2)) (fabs.f64 a2))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (neg.f64 a2)) (neg.f64 a2))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 a2 a2))
(*.f64 (*.f64 a2 a2) #s(approx (cos th) #s(literal 1 binary64)))
(*.f64 a2 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))
(*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(approx (cos th) #s(literal 1 binary64))) a2)
(*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (*.f64 a2 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))
(*.f64 a2 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(approx (cos th) #s(literal 1 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))
(*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))) (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (*.f64 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) (+.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))) (+.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (+.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)))) (+.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (+.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))))))
(neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))))
(neg.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(-.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))
(-.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))
(+.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
#s(literal -2 binary64)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))
(*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 #s(approx (cos th) #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(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))))) (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))) (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))) (-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64))) (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))) (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (-.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -2 binary64)))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) a1))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) a1))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) a1))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) a1))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal -2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))))) #s(literal -4 binary64))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)) #s(literal -2 binary64))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal -2 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)))) (+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 2 binary64))
(/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(neg.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1/2 binary64)))
(neg.f64 (/.f64 (-.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) #s(literal -2 binary64)) #s(literal -2 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)))
(-.f64 (/.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -2 binary64)) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))) #s(literal 4 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) #s(literal -2 binary64)))
(-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (/.f64 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) #s(literal -2 binary64)))
(-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64)))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 a1)))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (neg.f64 a1)) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 a1) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (neg.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)) #s(literal -1/2 binary64))))
(+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (cos.f64 th)))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (neg.f64 (neg.f64 (cos.f64 th)))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (cos.f64 th))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (cos.f64 th))))
(/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))) (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a1 a1) (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 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (neg.f64 a1) a1) (/.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 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 (cos.f64 th)))))
(*.f64 (/.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (cos.f64 th)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 a1 a1) (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 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (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 a1 a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (neg.f64 (*.f64 a2 a2))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (neg.f64 a1) a1)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (neg.f64 a1) a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))) (*.f64 (/.f64 (neg.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) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (neg.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 (neg.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 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))) (*.f64 (/.f64 (neg.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) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (*.f64 (neg.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 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.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))) (cos.f64 th))) (*.f64 (*.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))) (cos.f64 th)))) (-.f64 (*.f64 (/.f64 (*.f64 a1 a1) (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 (*.f64 (*.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))) (cos.f64 th))) (*.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))) (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (neg.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))))
(/.f64 (-.f64 (*.f64 (*.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))) (cos.f64 th))) (*.f64 (/.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))) (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.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))) (cos.f64 th))) (-.f64 (*.f64 (*.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))) (cos.f64 th))) (*.f64 (*.f64 (/.f64 (*.f64 a1 a1) (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 (pow.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.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))) (cos.f64 th))) (+.f64 (*.f64 (neg.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (neg.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))) (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (neg.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.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))) (cos.f64 th))) (+.f64 (*.f64 (/.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (neg.f64 (*.f64 a2 a2)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (neg.f64 (*.f64 a2 a2)))) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 a2 a2))) (*.f64 (/.f64 (neg.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) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (neg.f64 (*.f64 a2 a2)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (neg.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 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 a1 a1))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 a1 a1))) (*.f64 (/.f64 (neg.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) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 (neg.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) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 a1 a1))) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 (neg.f64 (+.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))))) (neg.f64 (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th)))))
(/.f64 (neg.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)))) (neg.f64 (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th)))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.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 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.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))) (cos.f64 th))) (*.f64 (*.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))) (cos.f64 th)))) (-.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.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))) (cos.f64 th))) (-.f64 (*.f64 (*.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))) (cos.f64 th))) (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (/.f64 (*.f64 a1 a1) (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 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1))) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th))) (neg.f64 (neg.f64 (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) (cos.f64 th)))
(/.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(neg.f64 (/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(neg.f64 (/.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 a2 (neg.f64 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 (neg.f64 (fabs.f64 a2)) (fabs.f64 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 (neg.f64 a2) a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (neg.f64 (*.f64 a2 a2)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(-.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(-.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (/.f64 (*.f64 (neg.f64 a1) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(-.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (neg.f64 (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))))
(-.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 (neg.f64 a1) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(+.f64 (/.f64 (*.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 (/.f64 (*.f64 a1 a1) (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 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th)))) (/.f64 (*.f64 (*.f64 a1 a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th)))))
(+.f64 (/.f64 (*.f64 (*.f64 a2 a2) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th)))) (/.f64 (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 a1 a1)) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 th) (cos.f64 th)))))
(+.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (/.f64 (*.f64 a1 a1) (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 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (/.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))))
(+.f64 (*.f64 (/.f64 (*.f64 a2 a2) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)) (*.f64 (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th)))

eval143.0ms (2.7%)

Memory
17.9MiB live, 1 386.7MiB allocated; 59ms collecting garbage
Compiler

Compiled 32 949 to 3 492 computations (89.4% saved)

prune50.0ms (1.0%)

Memory
-36.3MiB live, 419.2MiB allocated; 20ms collecting garbage
Pruning

26 alts after pruning (26 fresh and 0 done)

PrunedKeptTotal
New1 098161 114
Fresh61016
Picked505
Done000
Total1 109261 135
Accuracy
100.0%
Counts
1 135 → 26
Alt Table
Click to see full alt table
StatusAccuracyProgram
67.1%
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(approx (cos th) #s(literal 1 binary64))) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
67.1%
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 #s(literal 6369051672525773/4503599627370496 binary64))) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (neg.f64 #s(literal 6369051672525773/4503599627370496 binary64))))
67.1%
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
99.6%
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))
67.4%
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(approx (/ (sqrt 2) (cos th)) (sqrt.f64 #s(literal 2 binary64))))
99.6%
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) #s(literal 6369051672525773/4503599627370496 binary64))
66.8%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
66.8%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
98.8%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
67.4%
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2))
67.3%
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
67.3%
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (neg.f64 a1)) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 a2 a2)))
67.4%
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))
99.2%
(+.f64 (*.f64 #s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
99.6%
(*.f64 (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (cos.f64 th))
99.5%
(*.f64 (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
99.6%
(*.f64 (/.f64 (cos.f64 th) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
17.3%
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
67.0%
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
54.8%
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 a1 a1)))
67.1%
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64))))
67.3%
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
99.5%
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
29.1%
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))
99.2%
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1/2 binary64))
67.3%
(*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64))
Compiler

Compiled 1 108 to 770 computations (30.5% saved)

sample0.0ms (0.0%)

Memory
3.5MiB live, 3.5MiB allocated; 0ms collecting garbage
Calls
Call 1
Inputs
6369051672525773/4503599627370496
1
2
(sqrt 2)
Outputs
#s(literal 6369051672525773/4503599627370496 binary64)
#s(literal 1 binary64)
#s(literal 2 binary64)
#s(literal 6369051672525773/4503599627370496 binary64)
Samples
0.0ms0valid
Compiler

Compiled 7 to 6 computations (14.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 0.0ms
adjust: 0.0ms (0.0% of total)

series99.0ms (1.9%)

Memory
-2.3MiB live, 682.2MiB allocated; 26ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
05363892
Stop Event
iter-limit
Counts
30 → 105
Calls
Call 1
Inputs
a2
(*.f64 a2 a2)
a1
(*.f64 a1 a1)
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
th
(cos.f64 th)
(*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))
#s(literal 6369051672525773/4503599627370496 binary64)
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) #s(literal 6369051672525773/4503599627370496 binary64))
#s(literal 1 binary64)
#s(approx (cos th) #s(literal 1 binary64))
(/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
#s(literal 2 binary64)
(sqrt.f64 #s(literal 2 binary64))
(/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 a2 a2) (*.f64 a2 a2))
(sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))
(+.f64 (sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 a1 a1))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 a1 a1)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
(/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))
Outputs
#s(approx a1 a1)
#s(approx (* a1 a1) (pow.f64 a1 #s(literal 2 binary64)))
#s(approx (+ (* a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64)))
#s(approx (+ (* a2 a2) (* a1 a1)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) 6369051672525773/4503599627370496) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) 6369051672525773/4503599627370496) (+.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th))) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)))))
#s(approx (+ (sqrt (* (* a2 a2) (* a2 a2))) (* a1 a1)) (sqrt.f64 (pow.f64 a2 #s(literal 4 binary64))))
#s(approx (+ (sqrt (* (* a2 a2) (* a2 a2))) (* a1 a1)) (+.f64 (sqrt.f64 (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (sqrt (* (* a2 a2) (* a2 a2))) (* a1 a1))) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 (pow.f64 a2 #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (sqrt (* (* a2 a2) (* a2 a2))) (* a1 a1))) (+.f64 (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 (pow.f64 a2 #s(literal 4 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)))
#s(approx (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)))))
#s(approx (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2))) (+.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a2 #s(literal 6 binary64)) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (cos.f64 th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)))))
#s(approx (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2))) (+.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a2 #s(literal 8 binary64)) (cos.f64 th)))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal 6 binary64)) (cos.f64 th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (cos.f64 th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)))))
#s(approx (/ 1 (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2)))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ 1 (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2)))) (+.f64 (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 a1 #s(literal 2 binary64))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (cos.f64 th) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (pow.f64 a1 #s(literal 2 binary64))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) 6369051672525773/4503599627370496) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) 6369051672525773/4503599627370496) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (pow.f64 a1 #s(literal 2 binary64)))))))
#s(approx (+ (sqrt (* (* a2 a2) (* a2 a2))) (* a1 a1)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 a1 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (sqrt (* (* a2 a2) (* a2 a2))) (* a1 a1))) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 th) (sqrt.f64 (pow.f64 a2 #s(literal 4 binary64)))) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th))))
#s(approx (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2))) (/.f64 (-.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (cos.f64 th)))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)))) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2))) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a1 #s(literal 6 binary64)) (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (cos.f64 th)))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th))))) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (/ 1 (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2)))) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx a2 a2)
#s(approx (* (* a2 a2) (* a2 a2)) (pow.f64 a2 #s(literal 4 binary64)))
#s(approx (* (cos th) a2) (*.f64 a2 (cos.f64 th)))
#s(approx (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)))))
#s(approx (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2))) (+.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a1 #s(literal 6 binary64)) (cos.f64 th))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (cos.f64 th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)))))
#s(approx (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2))) (+.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a1 #s(literal 8 binary64)) (cos.f64 th)))) (*.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 6 binary64)) (cos.f64 th)))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (cos.f64 th))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)))))
#s(approx (+ (* a2 a2) (* a1 a1)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 (cos.f64 th) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) 6369051672525773/4503599627370496) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (pow.f64 a2 #s(literal 2 binary64)))))))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (sqrt (* (* a2 a2) (* a2 a2))) (* a1 a1))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (+.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2))) (/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2))) (/.f64 (-.f64 (+.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)) (/.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (cos.f64 th)))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)))) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2))) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 6 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a2 #s(literal 6 binary64)) (cos.f64 th)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a2 #s(literal 4 binary64)) (cos.f64 th)))) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th))))) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx th th)
#s(approx (cos th) #s(literal 1 binary64))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 th #s(literal 2 binary64)))))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
#s(approx (cos th) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(literal 1/2 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))) (*.f64 #s(literal 1/24 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))))) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) 6369051672525773/4503599627370496) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) 6369051672525773/4503599627370496) (+.f64 (*.f64 #s(literal -2251799813685248/6369051672525773 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) 6369051672525773/4503599627370496) (+.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2251799813685248/6369051672525773 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (*.f64 #s(literal 562949953421312/19107155017577319 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) 6369051672525773/4503599627370496) (+.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -2251799813685248/6369051672525773 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -281474976710656/286607325263659785 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))) (*.f64 #s(literal 562949953421312/19107155017577319 binary64) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))))))
#s(approx (/ (cos th) 6369051672525773/4503599627370496) #s(literal 4503599627370496/6369051672525773 binary64))
#s(approx (/ (cos th) 6369051672525773/4503599627370496) (+.f64 #s(literal 4503599627370496/6369051672525773 binary64) (*.f64 #s(literal -2251799813685248/6369051672525773 binary64) (pow.f64 th #s(literal 2 binary64)))))
#s(approx (/ (cos th) 6369051672525773/4503599627370496) (+.f64 #s(literal 4503599627370496/6369051672525773 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 562949953421312/19107155017577319 binary64) (pow.f64 th #s(literal 2 binary64))) #s(literal 2251799813685248/6369051672525773 binary64)))))
#s(approx (/ (cos th) 6369051672525773/4503599627370496) (+.f64 #s(literal 4503599627370496/6369051672525773 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 562949953421312/19107155017577319 binary64) (*.f64 #s(literal -281474976710656/286607325263659785 binary64) (pow.f64 th #s(literal 2 binary64))))) #s(literal 2251799813685248/6369051672525773 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (cos th) (sqrt 2)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (/ (cos th) (sqrt 2)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 th #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (sqrt (* (* a2 a2) (* a2 a2))) (* a1 a1))) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 a1 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (sqrt (* (* a2 a2) (* a2 a2))) (* a1 a1))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 a1 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (sqrt (* (* a2 a2) (* a2 a2))) (* a1 a1))) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 a1 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 a1 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (sqrt (* (* a2 a2) (* a2 a2))) (* a1 a1))) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 a1 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (sqrt.f64 (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 a1 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (+.f64 (sqrt.f64 (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 a1 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))) (+.f64 (/.f64 (sqrt.f64 (pow.f64 a2 #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (/ (cos th) (sqrt 2)) (* a1 a1)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64)))) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64)))))) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (pow.f64 a1 #s(literal 2 binary64))))))) (pow.f64 a1 #s(literal 2 binary64))))
#s(approx (* (cos th) a2) (+.f64 a2 (*.f64 #s(literal -1/2 binary64) (*.f64 a2 (pow.f64 th #s(literal 2 binary64))))))
#s(approx (* (cos th) a2) (+.f64 a2 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) a2) (*.f64 #s(literal 1/24 binary64) (*.f64 a2 (pow.f64 th #s(literal 2 binary64))))))))
#s(approx (* (cos th) a2) (+.f64 a2 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) a2) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 a2 (pow.f64 th #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) a2)))))))
#s(approx (* (* (cos th) a2) a2) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64)))) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (* (* (cos th) a2) a2) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a2 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64)))))) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (* (* (cos th) a2) a2) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a2 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (pow.f64 th #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (pow.f64 a2 #s(literal 2 binary64))))))) (pow.f64 a2 #s(literal 2 binary64))))
#s(approx (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (pow.f64 a2 #s(literal 2 binary64))))) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a2 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 a2 #s(literal 2 binary64)))))))) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2)) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a2 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a1 #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a2 #s(literal 2 binary64))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (pow.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a2 #s(literal 2 binary64))))))))))) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (pow.f64 a2 #s(literal 2 binary64)))))) (pow.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) #s(literal 2 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2))) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (pow.f64 a2 #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 a2 #s(literal 2 binary64))))) (pow.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (pow.f64 a2 #s(literal 2 binary64))))) (pow.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) #s(literal 2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2))) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (pow.f64 a2 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 a2 #s(literal 2 binary64)))))) (pow.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) #s(literal 3 binary64)))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (pow.f64 a2 #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 a2 #s(literal 2 binary64))))) (pow.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (pow.f64 a2 #s(literal 2 binary64))))) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (pow.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal -1/720 binary64) (pow.f64 a2 #s(literal 2 binary64))))) (pow.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) #s(literal 2 binary64))))))) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (pow.f64 a2 #s(literal 2 binary64)))) #s(literal 2 binary64))) (pow.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) #s(literal 3 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 a2 #s(literal 2 binary64))))) (pow.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 a1 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (pow.f64 a2 #s(literal 2 binary64))))) (pow.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) #s(literal 2 binary64))))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (/ 1 (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2)))) (/.f64 (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ 1 (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2)))) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ 1 (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2)))) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ 1 (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2)))) (+.f64 (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/720 binary64) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64)))))))))))) (+.f64 (/.f64 (pow.f64 a1 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (pow.f64 a2 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (/ 6369051672525773/4503599627370496 (cos th)) #s(literal 6369051672525773/4503599627370496 binary64))
#s(approx (/ 6369051672525773/4503599627370496 (cos th)) (+.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 #s(literal 6369051672525773/9007199254740992 binary64) (pow.f64 th #s(literal 2 binary64)))))
#s(approx (/ 6369051672525773/4503599627370496 (cos th)) (+.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 6369051672525773/9007199254740992 binary64) (*.f64 #s(literal 31845258362628865/108086391056891904 binary64) (pow.f64 th #s(literal 2 binary64)))))))
#s(approx (/ 6369051672525773/4503599627370496 (cos th)) (+.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 6369051672525773/9007199254740992 binary64) (*.f64 (pow.f64 th #s(literal 2 binary64)) (+.f64 #s(literal 31845258362628865/108086391056891904 binary64) (*.f64 #s(literal 388512152024072153/3242591731706757120 binary64) (pow.f64 th #s(literal 2 binary64)))))))))
#s(approx (cos th) (cos.f64 th))
#s(approx (* (+ (* a2 a2) (* a1 a1)) (cos th)) (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64)))))
#s(approx (/ (* (+ (* a2 a2) (* a1 a1)) (cos th)) 6369051672525773/4503599627370496) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (*.f64 (cos.f64 th) (+.f64 (pow.f64 a1 #s(literal 2 binary64)) (pow.f64 a2 #s(literal 2 binary64))))))
#s(approx (/ (cos th) 6369051672525773/4503599627370496) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))
#s(approx (/ (cos th) (sqrt 2)) (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (* (/ (cos th) (sqrt 2)) (+ (sqrt (* (* a2 a2) (* a2 a2))) (* a1 a1))) (/.f64 (*.f64 (cos.f64 th) (+.f64 (sqrt.f64 (pow.f64 a2 #s(literal 4 binary64))) (pow.f64 a1 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th)))))
#s(approx (/ 1 (/ (sqrt 2) (+ (* (* (/ (cos th) (sqrt 2)) (* a1 a1)) (sqrt 2)) (* (* (cos th) a2) a2)))) (/.f64 (+.f64 (*.f64 (pow.f64 a1 #s(literal 2 binary64)) (cos.f64 th)) (*.f64 (pow.f64 a2 #s(literal 2 binary64)) (cos.f64 th))) (sqrt.f64 #s(literal 2 binary64))))
#s(approx (/ 6369051672525773/4503599627370496 (cos th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))
Calls

9 calls:

TimeVariablePoint
17.0ms
th
-inf
10.0ms
th
inf
6.0ms
th
0
5.0ms
a1
inf
5.0ms
a2
inf

rewrite272.0ms (5.2%)

Memory
34.8MiB live, 2 059.7MiB allocated; 64ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
031255
054227
1236223
21167223
04064214
Stop Event
iter-limit
node-limit
iter-limit
Counts
30 → 1 270
Calls
Call 1
Inputs
a2
(*.f64 a2 a2)
a1
(*.f64 a1 a1)
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
th
(cos.f64 th)
(*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))
#s(literal 6369051672525773/4503599627370496 binary64)
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) #s(literal 6369051672525773/4503599627370496 binary64))
#s(literal 1 binary64)
#s(approx (cos th) #s(literal 1 binary64))
(/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
#s(literal 2 binary64)
(sqrt.f64 #s(literal 2 binary64))
(/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 a2 a2) (*.f64 a2 a2))
(sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))
(+.f64 (sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 a1 a1))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 a1 a1)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
(/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))
Outputs
a2
(*.f64 (pow.f64 (fabs.f64 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 a2))) (neg.f64 (neg.f64 (fabs.f64 a2))))
(*.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 a2))))
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 a2) (neg.f64 a2))) (sqrt.f64 (*.f64 (fabs.f64 a2) (neg.f64 a2))))
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 a2) a2)) (sqrt.f64 (*.f64 (fabs.f64 a2) a2)))
(*.f64 (sqrt.f64 (*.f64 (neg.f64 a2) (fabs.f64 a2))) (sqrt.f64 (*.f64 (neg.f64 a2) (fabs.f64 a2))))
(*.f64 (sqrt.f64 (*.f64 a2 (fabs.f64 a2))) (sqrt.f64 (*.f64 a2 (fabs.f64 a2))))
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 a2) (*.f64 a2 a2))) (sqrt.f64 (fabs.f64 a2)))
(*.f64 (sqrt.f64 (*.f64 (neg.f64 a2) (*.f64 a2 a2))) (sqrt.f64 (neg.f64 a2)))
(*.f64 (sqrt.f64 (fabs.f64 a2)) (sqrt.f64 (*.f64 (fabs.f64 a2) (*.f64 a2 a2))))
(*.f64 (sqrt.f64 (neg.f64 a2)) (sqrt.f64 (*.f64 (neg.f64 a2) (*.f64 a2 a2))))
(*.f64 (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)) (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)) (fabs.f64 a2))
(*.f64 (pow.f64 (neg.f64 a2) #s(literal 1 binary64)) (pow.f64 (neg.f64 a2) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 a2) #s(literal 1 binary64)) (neg.f64 a2))
(*.f64 (pow.f64 (*.f64 (fabs.f64 a2) (neg.f64 a2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 a2) (neg.f64 a2)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (fabs.f64 a2) a2) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 a2) a2) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 a2) (fabs.f64 a2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 a2) (fabs.f64 a2)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 a2 (fabs.f64 a2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 a2 (fabs.f64 a2)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (fabs.f64 a2) (*.f64 a2 a2)) #s(literal 1/2 binary64)) (pow.f64 (fabs.f64 a2) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (fabs.f64 a2) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 a2) (*.f64 a2 a2)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 a2) (*.f64 a2 a2)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 a2) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (neg.f64 a2) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 a2) (*.f64 a2 a2)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 a2 (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 a2 (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 a2)) (neg.f64 (fabs.f64 a2)))
(*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)))
(*.f64 (sqrt.f64 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 (*.f64 (neg.f64 a2) a2)))
(*.f64 (sqrt.f64 (*.f64 (*.f64 a2 a2) a2)) (sqrt.f64 a2))
(*.f64 (sqrt.f64 a2) (sqrt.f64 (*.f64 (*.f64 a2 a2) a2)))
(*.f64 (pow.f64 a2 #s(literal 1 binary64)) (pow.f64 a2 #s(literal 1 binary64)))
(*.f64 (pow.f64 a2 #s(literal 1 binary64)) a2)
(*.f64 (pow.f64 (*.f64 (neg.f64 a2) a2) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 a2) a2) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 a2 a2) a2) #s(literal 1/2 binary64)) (pow.f64 a2 #s(literal 1/2 binary64)))
(*.f64 (pow.f64 a2 #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 a2 a2) a2) #s(literal 1/2 binary64)))
(*.f64 (fabs.f64 a2) (fabs.f64 a2))
(*.f64 (neg.f64 a2) (neg.f64 a2))
(*.f64 a2 a2)
(pow.f64 (neg.f64 (fabs.f64 a2)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 a2)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)) #s(literal 1/4 binary64))
(pow.f64 (fabs.f64 a2) #s(literal 2 binary64))
(pow.f64 (neg.f64 a2) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) #s(literal 1/2 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(pow.f64 a2 #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)) (pow.f64 (fabs.f64 a2) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 a2) #s(literal 1 binary64)) (pow.f64 (neg.f64 a2) #s(literal -1 binary64)))
(/.f64 (pow.f64 a2 #s(literal 1 binary64)) (pow.f64 a2 #s(literal -1 binary64)))
(neg.f64 (*.f64 (neg.f64 a2) a2))
(sqrt.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2))
(fabs.f64 (*.f64 (fabs.f64 a2) (neg.f64 a2)))
(fabs.f64 (*.f64 (fabs.f64 a2) a2))
(fabs.f64 (*.f64 (neg.f64 a2) (fabs.f64 a2)))
(fabs.f64 (*.f64 a2 (fabs.f64 a2)))
(fabs.f64 (*.f64 (neg.f64 a2) a2))
(fabs.f64 (*.f64 a2 a2))
(exp.f64 (*.f64 (log.f64 (fabs.f64 a2)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 a2)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64)))
a1
(*.f64 (pow.f64 (fabs.f64 a1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 a1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 a1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 a1) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 a1))) (neg.f64 (neg.f64 (fabs.f64 a1))))
(*.f64 (neg.f64 (neg.f64 (neg.f64 a1))) (neg.f64 (neg.f64 (neg.f64 a1))))
(*.f64 (pow.f64 (fabs.f64 a1) #s(literal 1 binary64)) (pow.f64 (fabs.f64 a1) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 a1) #s(literal 1 binary64)) (fabs.f64 a1))
(*.f64 (pow.f64 (neg.f64 a1) #s(literal 1 binary64)) (pow.f64 (neg.f64 a1) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 a1) #s(literal 1 binary64)) (neg.f64 a1))
(*.f64 (pow.f64 a1 (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 a1 (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 a1)) (neg.f64 (fabs.f64 a1)))
(*.f64 (neg.f64 (neg.f64 a1)) (neg.f64 (neg.f64 a1)))
(*.f64 (pow.f64 a1 #s(literal 1 binary64)) (pow.f64 a1 #s(literal 1 binary64)))
(*.f64 (pow.f64 a1 #s(literal 1 binary64)) a1)
(*.f64 (fabs.f64 a1) (fabs.f64 a1))
(*.f64 (neg.f64 a1) (neg.f64 a1))
(*.f64 a1 a1)
(pow.f64 (neg.f64 (fabs.f64 a1)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 a1)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 a1) #s(literal 2 binary64))
(pow.f64 (neg.f64 a1) #s(literal 2 binary64))
(pow.f64 (*.f64 a1 a1) #s(literal 1 binary64))
(pow.f64 a1 #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 a1) #s(literal 1 binary64)) (pow.f64 (fabs.f64 a1) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 a1) #s(literal 1 binary64)) (pow.f64 (neg.f64 a1) #s(literal -1 binary64)))
(/.f64 (pow.f64 a1 #s(literal 1 binary64)) (pow.f64 a1 #s(literal -1 binary64)))
(neg.f64 (*.f64 (neg.f64 a1) a1))
(sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))
(fabs.f64 (*.f64 (neg.f64 a1) a1))
(fabs.f64 (*.f64 a1 a1))
(exp.f64 (*.f64 (log.f64 (fabs.f64 a1)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 a1)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 a1) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (*.f64 a2 a2))) (*.f64 a2 a2))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 a2) a2) (*.f64 a1 a1))) (*.f64 a1 a1))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a1 a1))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2))) (*.f64 a2 a2))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 a2 a2))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (*.f64 (neg.f64 (neg.f64 a1)) a1))) (-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)) (+.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (+.f64 (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (*.f64 (neg.f64 (neg.f64 a1)) a1)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1)))))
(/.f64 (-.f64 (pow.f64 (*.f64 a1 a1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 a2) a2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 (neg.f64 a1) a1))) (+.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1)))
(/.f64 (+.f64 (pow.f64 (*.f64 a1 a1) #s(literal 3 binary64)) (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 a1) a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 (neg.f64 a1) a1)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (+.f64 (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64)) (pow.f64 (*.f64 a1 a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(neg.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)))
(-.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2))
(-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
th
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) (*.f64 (sin.f64 th) #s(literal 0 binary64)))) (*.f64 (sin.f64 th) #s(literal 0 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (sin.f64 th) #s(literal 0 binary64))) (*.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64)))) (-.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (sin.f64 th) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 th) #s(literal 1 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64))))))
(sin.f64 (+.f64 (neg.f64 (neg.f64 th)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 (fabs.f64 th)) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (neg.f64 th) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (fabs.f64 th) (*.f64 (PI.f64) #s(literal 1/2 binary64))))
(sin.f64 (+.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64)) th))
(-.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (cos.f64 th) (sin.f64 (neg.f64 (*.f64 (PI.f64) #s(literal 1/2 binary64))))))
(cos.f64 (neg.f64 (neg.f64 (neg.f64 th))))
(cos.f64 (neg.f64 (neg.f64 (fabs.f64 th))))
(cos.f64 (neg.f64 (neg.f64 th)))
(cos.f64 (neg.f64 (fabs.f64 th)))
(cos.f64 (neg.f64 th))
(cos.f64 (fabs.f64 th))
(cos.f64 th)
(+.f64 (*.f64 (sin.f64 (neg.f64 th)) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(+.f64 (*.f64 (sin.f64 (fabs.f64 th)) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 #s(literal 0 binary64) (sin.f64 th)))
(+.f64 (*.f64 (sin.f64 th) #s(literal 0 binary64)) (*.f64 (cos.f64 th) #s(literal 1 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (*.f64 (cos.f64 th) (*.f64 a1 a1)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (*.f64 (cos.f64 th) (*.f64 a2 a2)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (cos.f64 th)))) (*.f64 (*.f64 a1 a1) (cos.f64 th)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (*.f64 (*.f64 a2 a2) (cos.f64 th)))
(*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (cos.f64 th))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a2 a2)))) (-.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a1 a1)))) (-.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))) (-.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (cos.f64 th)))) (-.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (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 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a2 a2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) (*.f64 (cos.f64 th) (*.f64 a1 a1))) (*.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) (*.f64 (cos.f64 th) (*.f64 a1 a1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (cos.f64 th))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th))) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (cos.f64 th))))))
(+.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 (*.f64 (*.f64 a1 a1) (cos.f64 th)) (*.f64 (*.f64 a2 a2) (cos.f64 th)))
(+.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) (*.f64 (*.f64 a1 a1) (cos.f64 th)))
#s(literal 6369051672525773/4503599627370496 binary64)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #s(literal 4503599627370496/6369051672525773 binary64))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)) #s(literal 4503599627370496/6369051672525773 binary64))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -4503599627370496/6369051672525773 binary64)) (neg.f64 (cos.f64 th)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 a1 a1)) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))
(*.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64))))
(*.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 4503599627370496/6369051672525773 binary64))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 (cos.f64 th) #s(literal 1 binary64)))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))
(*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) #s(literal -6369051672525773/4503599627370496 binary64)))
(*.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th)) #s(literal -4503599627370496/6369051672525773 binary64))
(*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 4503599627370496/6369051672525773 binary64))
(*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (neg.f64 a2) a2)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 a2 a2)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (neg.f64 a1) a1)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (neg.f64 a1) a1)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th))))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 (neg.f64 a2) a2))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (neg.f64 a2) a2))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (neg.f64 a2) a2))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 a2 a2))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 a1 a1))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 a1 a1))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64))) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 a1 a1))) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))) (neg.f64 (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 a1 a1)))) (neg.f64 (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th)))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64))) (neg.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 a1 a1)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 a1 a1))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 6369051672525773/4503599627370496 binary64))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(/.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th)) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 a1 a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 a1 a1)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (neg.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 6369051672525773/4503599627370496 binary64))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(neg.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th))))
(neg.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -4503599627370496/6369051672525773 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(-.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(-.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 (*.f64 (*.f64 a1 a1) #s(literal -4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(-.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))))
(-.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th))))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))
(+.f64 (/.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64))) (/.f64 (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 a1 a1)) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 6369051672525773/4503599627370496 binary64)) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 6369051672525773/4503599627370496 binary64)))
(+.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 6369051672525773/4503599627370496 binary64)) (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 6369051672525773/4503599627370496 binary64)))
(+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) #s(literal 6369051672525773/4503599627370496 binary64)) (/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 6369051672525773/4503599627370496 binary64)))
(+.f64 (/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 6369051672525773/4503599627370496 binary64)) (/.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) #s(literal 6369051672525773/4503599627370496 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))
(+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))
#s(literal 1 binary64)
#s(approx (cos th) #s(literal 1 binary64))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 4503599627370496/6369051672525773 binary64))
(*.f64 (neg.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal 4503599627370496/6369051672525773 binary64))
(*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64)))
(*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) #s(literal -4503599627370496/6369051672525773 binary64))
(*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 4503599627370496/6369051672525773 binary64))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 1 binary64))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (neg.f64 (neg.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64))
(/.f64 (neg.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal 6369051672525773/4503599627370496 binary64))
(/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (neg.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) #s(approx (cos th) #s(literal 1 binary64))))
(neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal -4503599627370496/6369051672525773 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1))) (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal -4503599627370496/6369051672525773 binary64))
(*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -4503599627370496/6369051672525773 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)))
(*.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -4503599627370496/6369051672525773 binary64))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 4503599627370496/6369051672525773 binary64))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) #s(literal 6369051672525773/4503599627370496 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 6369051672525773/4503599627370496 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal -6369051672525773/4503599627370496 binary64))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) #s(literal -6369051672525773/4503599627370496 binary64))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal -6369051672525773/4503599627370496 binary64))) #s(literal -40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal -6369051672525773/4503599627370496 binary64))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) #s(literal -6369051672525773/4503599627370496 binary64))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal -6369051672525773/4503599627370496 binary64))) #s(literal -40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal 6369051672525773/4503599627370496 binary64))) #s(literal -40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) #s(literal 6369051672525773/4503599627370496 binary64))) #s(literal -40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 6369051672525773/4503599627370496 binary64))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal -6369051672525773/4503599627370496 binary64))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) #s(literal -6369051672525773/4503599627370496 binary64))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) #s(literal -6369051672525773/4503599627370496 binary64))) #s(literal -40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal -6369051672525773/4503599627370496 binary64))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) #s(literal -6369051672525773/4503599627370496 binary64))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) #s(literal -6369051672525773/4503599627370496 binary64))) #s(literal -40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal 6369051672525773/4503599627370496 binary64))) #s(literal -40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) #s(literal 6369051672525773/4503599627370496 binary64))) #s(literal -40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) #s(literal 6369051672525773/4503599627370496 binary64))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1)) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64))) (*.f64 (*.f64 (neg.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 a1 a1)) (*.f64 (neg.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 a1 a1)))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (neg.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64)))))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1)) (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1)))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64))) (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 a1 a1)) (*.f64 (neg.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 a1 a1))) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (neg.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 a1 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))))) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64))) (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1)) (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1))) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1))))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 #s(literal -6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 #s(literal -6369051672525773/4503599627370496 binary64) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 #s(literal -6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) #s(literal -40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 #s(literal -6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 #s(literal -6369051672525773/4503599627370496 binary64) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 #s(literal -6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) #s(literal -40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal -40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 #s(literal -6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 #s(literal -6369051672525773/4503599627370496 binary64) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 #s(literal -6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal -40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 #s(literal -6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 #s(literal -6369051672525773/4503599627370496 binary64) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 #s(literal -6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal -40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal -40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal -6369051672525773/4503599627370496 binary64)) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal -40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) #s(literal 6369051672525773/4503599627370496 binary64))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 6369051672525773/4503599627370496 binary64))
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 6369051672525773/4503599627370496 binary64))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64))) (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1))) (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1)) (*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1)))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 6369051672525773/4503599627370496 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (neg.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 a1 a1)))
(-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64)))))
(-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (neg.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1))
#s(literal 2 binary64)
(*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 #s(literal 2 binary64) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(cosh.f64 (asinh.f64 #s(literal 1 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(fabs.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(fabs.f64 (sqrt.f64 #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(approx (cos th) #s(literal 1 binary64)))
(*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(approx (cos th) #s(literal 1 binary64))))
(neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(neg.f64 (/.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (/.f64 #s(literal 1 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 a2 (/.f64 #s(literal 4 binary64) #s(literal 2 binary64))) (pow.f64 a2 (/.f64 #s(literal 4 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (*.f64 (fabs.f64 a2) (neg.f64 a2))) (neg.f64 (*.f64 (fabs.f64 a2) (neg.f64 a2))))
(*.f64 (neg.f64 (*.f64 (fabs.f64 a2) a2)) (neg.f64 (*.f64 (fabs.f64 a2) a2)))
(*.f64 (neg.f64 (*.f64 (neg.f64 a2) (fabs.f64 a2))) (neg.f64 (*.f64 (neg.f64 a2) (fabs.f64 a2))))
(*.f64 (neg.f64 (*.f64 a2 (fabs.f64 a2))) (neg.f64 (*.f64 a2 (fabs.f64 a2))))
(*.f64 (fabs.f64 (*.f64 (fabs.f64 a2) (*.f64 a2 a2))) (fabs.f64 a2))
(*.f64 (pow.f64 (*.f64 (fabs.f64 a2) (neg.f64 a2)) #s(literal 1 binary64)) (pow.f64 (*.f64 (fabs.f64 a2) (neg.f64 a2)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (fabs.f64 a2) a2) #s(literal 1 binary64)) (pow.f64 (*.f64 (fabs.f64 a2) a2) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 a2) (fabs.f64 a2)) #s(literal 1 binary64)) (pow.f64 (*.f64 (neg.f64 a2) (fabs.f64 a2)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 a2 (fabs.f64 a2)) #s(literal 1 binary64)) (pow.f64 (*.f64 a2 (fabs.f64 a2)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (fabs.f64 a2) (*.f64 a2 a2)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)) (pow.f64 (*.f64 (fabs.f64 a2) (*.f64 a2 a2)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 a2) a2) #s(literal 1 binary64)) (pow.f64 (*.f64 (neg.f64 a2) a2) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 a2) a2) #s(literal 1 binary64)) (*.f64 (neg.f64 a2) a2))
(*.f64 (pow.f64 (*.f64 (neg.f64 a2) (*.f64 a2 a2)) #s(literal 1 binary64)) (pow.f64 (neg.f64 a2) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 a2) #s(literal 1 binary64)) (pow.f64 (*.f64 (neg.f64 a2) (*.f64 a2 a2)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 a2 a2) a2) #s(literal 1 binary64)) (pow.f64 a2 #s(literal 1 binary64)))
(*.f64 (*.f64 (fabs.f64 a2) (*.f64 a2 a2)) (fabs.f64 a2))
(*.f64 (*.f64 (neg.f64 a2) (*.f64 a2 a2)) (neg.f64 a2))
(*.f64 (*.f64 (fabs.f64 a2) (neg.f64 a2)) (*.f64 (fabs.f64 a2) (neg.f64 a2)))
(*.f64 (*.f64 (fabs.f64 a2) a2) (*.f64 (fabs.f64 a2) a2))
(*.f64 (*.f64 (neg.f64 a2) (fabs.f64 a2)) (*.f64 (neg.f64 a2) (fabs.f64 a2)))
(*.f64 (*.f64 a2 (fabs.f64 a2)) (*.f64 a2 (fabs.f64 a2)))
(*.f64 (pow.f64 (*.f64 a2 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 a2 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 a2 #s(literal 1 binary64)) (pow.f64 (*.f64 (*.f64 a2 a2) a2) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 a2 a2) a2) a2)
(*.f64 (fabs.f64 a2) (fabs.f64 (*.f64 (fabs.f64 a2) (*.f64 a2 a2))))
(*.f64 (fabs.f64 a2) (*.f64 (fabs.f64 a2) (*.f64 a2 a2)))
(*.f64 (*.f64 (neg.f64 a2) a2) (*.f64 (neg.f64 a2) a2))
(*.f64 (neg.f64 a2) (*.f64 (neg.f64 a2) (*.f64 a2 a2)))
(*.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) #s(literal 0 binary64)))
(*.f64 (*.f64 a2 a2) (*.f64 a2 a2))
(*.f64 a2 (*.f64 (*.f64 a2 a2) a2))
(pow.f64 (*.f64 (fabs.f64 a2) (neg.f64 a2)) #s(literal 2 binary64))
(pow.f64 (*.f64 (fabs.f64 a2) a2) #s(literal 2 binary64))
(pow.f64 (*.f64 (neg.f64 a2) (fabs.f64 a2)) #s(literal 2 binary64))
(pow.f64 (*.f64 a2 (fabs.f64 a2)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)) #s(literal 1/2 binary64))
(pow.f64 (fabs.f64 a2) #s(literal 4 binary64))
(pow.f64 (*.f64 (neg.f64 a2) a2) #s(literal 2 binary64))
(pow.f64 (neg.f64 a2) #s(literal 4 binary64))
(pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) #s(literal 1 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 2 binary64))
(pow.f64 a2 #s(literal 4 binary64))
(/.f64 (pow.f64 (*.f64 (neg.f64 a2) a2) #s(literal 1 binary64)) (pow.f64 (*.f64 (neg.f64 a2) a2) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) #s(literal -1 binary64)))
(/.f64 (*.f64 a2 a2) (pow.f64 (*.f64 a2 a2) #s(literal -1 binary64)))
(neg.f64 (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a2) a2)))
(neg.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (*.f64 a2 a2)))
(sqrt.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)))
(fabs.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)))
(fabs.f64 (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a2) a2)))
(fabs.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (*.f64 a2 a2)))
(fabs.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 (*.f64 a2 a2) a2) a2))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (neg.f64 a2) a2)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 a2) #s(literal 4 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 a2 a2)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (fabs.f64 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 a2) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 a2))) (neg.f64 (neg.f64 (fabs.f64 a2))))
(*.f64 (neg.f64 (neg.f64 (neg.f64 a2))) (neg.f64 (neg.f64 (neg.f64 a2))))
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 a2) (neg.f64 a2))) (sqrt.f64 (*.f64 (fabs.f64 a2) (neg.f64 a2))))
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 a2) a2)) (sqrt.f64 (*.f64 (fabs.f64 a2) a2)))
(*.f64 (sqrt.f64 (*.f64 (neg.f64 a2) (fabs.f64 a2))) (sqrt.f64 (*.f64 (neg.f64 a2) (fabs.f64 a2))))
(*.f64 (sqrt.f64 (*.f64 a2 (fabs.f64 a2))) (sqrt.f64 (*.f64 a2 (fabs.f64 a2))))
(*.f64 (sqrt.f64 (*.f64 (fabs.f64 a2) (*.f64 a2 a2))) (sqrt.f64 (fabs.f64 a2)))
(*.f64 (sqrt.f64 (*.f64 (neg.f64 a2) (*.f64 a2 a2))) (sqrt.f64 (neg.f64 a2)))
(*.f64 (sqrt.f64 (fabs.f64 a2)) (sqrt.f64 (*.f64 (fabs.f64 a2) (*.f64 a2 a2))))
(*.f64 (sqrt.f64 (neg.f64 a2)) (sqrt.f64 (*.f64 (neg.f64 a2) (*.f64 a2 a2))))
(*.f64 (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)) (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)) (fabs.f64 a2))
(*.f64 (pow.f64 (neg.f64 a2) #s(literal 1 binary64)) (pow.f64 (neg.f64 a2) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 a2) #s(literal 1 binary64)) (neg.f64 a2))
(*.f64 (pow.f64 (*.f64 (fabs.f64 a2) (neg.f64 a2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 a2) (neg.f64 a2)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (fabs.f64 a2) a2) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 a2) a2) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 a2) (fabs.f64 a2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 a2) (fabs.f64 a2)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 a2 (fabs.f64 a2)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 a2 (fabs.f64 a2)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (fabs.f64 a2) (*.f64 a2 a2)) #s(literal 1/2 binary64)) (pow.f64 (fabs.f64 a2) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (fabs.f64 a2) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (fabs.f64 a2) (*.f64 a2 a2)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (neg.f64 a2) (*.f64 a2 a2)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 a2) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (neg.f64 a2) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 a2) (*.f64 a2 a2)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 a2 (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 a2 (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 a2)) (neg.f64 (fabs.f64 a2)))
(*.f64 (neg.f64 (neg.f64 a2)) (neg.f64 (neg.f64 a2)))
(*.f64 (sqrt.f64 (*.f64 (neg.f64 a2) a2)) (sqrt.f64 (*.f64 (neg.f64 a2) a2)))
(*.f64 (sqrt.f64 (*.f64 (*.f64 a2 a2) a2)) (sqrt.f64 a2))
(*.f64 (sqrt.f64 a2) (sqrt.f64 (*.f64 (*.f64 a2 a2) a2)))
(*.f64 (pow.f64 a2 #s(literal 1 binary64)) (pow.f64 a2 #s(literal 1 binary64)))
(*.f64 (pow.f64 a2 #s(literal 1 binary64)) a2)
(*.f64 (pow.f64 (*.f64 (neg.f64 a2) a2) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (neg.f64 a2) a2) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 a2 a2) a2) #s(literal 1/2 binary64)) (pow.f64 a2 #s(literal 1/2 binary64)))
(*.f64 (pow.f64 a2 #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 a2 a2) a2) #s(literal 1/2 binary64)))
(*.f64 (fabs.f64 a2) (fabs.f64 a2))
(*.f64 (neg.f64 a2) (neg.f64 a2))
(*.f64 a2 a2)
(pow.f64 (neg.f64 (fabs.f64 a2)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 a2)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)) #s(literal 1/4 binary64))
(pow.f64 (fabs.f64 a2) #s(literal 2 binary64))
(pow.f64 (neg.f64 a2) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) #s(literal 1/2 binary64))
(pow.f64 (*.f64 a2 a2) #s(literal 1 binary64))
(pow.f64 a2 #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 a2) #s(literal 1 binary64)) (pow.f64 (fabs.f64 a2) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 a2) #s(literal 1 binary64)) (pow.f64 (neg.f64 a2) #s(literal -1 binary64)))
(/.f64 (pow.f64 a2 #s(literal 1 binary64)) (pow.f64 a2 #s(literal -1 binary64)))
(neg.f64 (*.f64 (neg.f64 a2) a2))
(sqrt.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2))
(fabs.f64 (*.f64 (fabs.f64 a2) (neg.f64 a2)))
(fabs.f64 (*.f64 (fabs.f64 a2) a2))
(fabs.f64 (*.f64 (neg.f64 a2) (fabs.f64 a2)))
(fabs.f64 (*.f64 a2 (fabs.f64 a2)))
(fabs.f64 (*.f64 (neg.f64 a2) a2))
(fabs.f64 (*.f64 a2 a2))
(exp.f64 (*.f64 (log.f64 (fabs.f64 a2)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 a2)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 a2) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (*.f64 a2 a2))) (*.f64 a2 a2))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 a2) a2) (*.f64 a1 a1))) (*.f64 a1 a1))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (*.f64 a1 a1))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2))) (*.f64 a2 a2))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (*.f64 a2 a2))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (*.f64 (neg.f64 (neg.f64 a1)) a1))) (-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)) (+.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)) (-.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(/.f64 (+.f64 (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (-.f64 (*.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (*.f64 (neg.f64 (neg.f64 a1)) a1)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1)))))
(/.f64 (-.f64 (pow.f64 (*.f64 a1 a1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 a2) a2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 (neg.f64 a1) a1))) (+.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1)))
(/.f64 (+.f64 (pow.f64 (*.f64 a1 a1) #s(literal 3 binary64)) (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 a1) a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 (neg.f64 a1) a1)) (*.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (+.f64 (pow.f64 (*.f64 a2 a2) #s(literal 3 binary64)) (pow.f64 (*.f64 a1 a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (-.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(neg.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)))
(-.f64 (*.f64 a1 a1) (*.f64 (neg.f64 a2) a2))
(-.f64 (*.f64 a2 a2) (*.f64 (neg.f64 a1) a1))
(+.f64 (*.f64 a1 a1) (*.f64 a2 a2))
(+.f64 (*.f64 a2 a2) (*.f64 (neg.f64 (neg.f64 a1)) a1))
(+.f64 (*.f64 a2 a2) (*.f64 a1 a1))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(*.f64 (/.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))
(*.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 #s(approx (cos th) #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(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)))) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) (-.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))) (-.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))) (-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1))) (+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1)))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))) (+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))) (+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (-.f64 (*.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (+.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (+.f64 (*.f64 (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (+.f64 (*.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (+.f64 (*.f64 (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))))
(/.f64 #s(literal -2 binary64) (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(neg.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(-.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (/.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (/.f64 (*.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (/.f64 (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64)))
(+.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(+.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)))
(+.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))
(+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) #s(approx (cos th) #s(literal 1 binary64)))) a2) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (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 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) #s(approx (cos th) #s(literal 1 binary64)))) a2) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (fabs.f64 a1)) (fabs.f64 a1))
(*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1))
(*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) a1)
(*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (fabs.f64 a1) (*.f64 (fabs.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 a1) (*.f64 (neg.f64 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 (*.f64 a1 a1) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 a1 a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 a1 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1)
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(*.f64 (*.f64 a1 a1) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #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 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2)
(*.f64 a2 #s(approx (cos th) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (fabs.f64 a2)) (fabs.f64 a2))
(*.f64 (*.f64 (neg.f64 a2) #s(approx (cos th) #s(literal 1 binary64))) (neg.f64 a2))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 a2 a2))
(*.f64 (*.f64 a2 a2) #s(approx (cos th) #s(literal 1 binary64)))
(*.f64 a2 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) #s(approx (cos th) #s(literal 1 binary64)))) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) #s(approx (cos th) #s(literal 1 binary64)))) a2) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) #s(approx (cos th) #s(literal 1 binary64)))) a2))) (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) #s(approx (cos th) #s(literal 1 binary64)))) a2)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))))) (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (*.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (neg.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) #s(approx (cos th) #s(literal 1 binary64)))) a2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) #s(approx (cos th) #s(literal 1 binary64)))) a2) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) #s(approx (cos th) #s(literal 1 binary64)))) a2)) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) #s(approx (cos th) #s(literal 1 binary64)))) a2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (+.f64 (*.f64 (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (+.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))))
(neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (*.f64 (neg.f64 a2) #s(approx (cos th) #s(literal 1 binary64)))) a2))
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))))
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))) (neg.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(neg.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(*.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(*.f64 (/.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))
(*.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 #s(approx (cos th) #s(literal 1 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 #s(approx (cos th) #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(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1 binary64))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)))) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))) (-.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))) (-.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)))) (-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))) (-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1))) (+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1)))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))) (+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))) (+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (-.f64 (*.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (+.f64 (*.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1) (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1)) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (+.f64 (*.f64 (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (+.f64 (*.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (+.f64 (*.f64 (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 a2) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (neg.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))
(/.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))) (-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2))) (-.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))))
(/.f64 #s(literal -2 binary64) (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))))
(/.f64 (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (neg.f64 #s(approx (cos th) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(neg.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(-.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (/.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (/.f64 (*.f64 (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (/.f64 (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (/.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (/.f64 (neg.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64)))) a1))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (neg.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (neg.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1))))
(-.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) #s(literal -1 binary64)))
(+.f64 (/.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(+.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)))
(+.f64 (/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1))) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)))
(+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) #s(approx (cos th) #s(literal 1 binary64)))) a2) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal 1 binary64)) #s(literal 2 binary64)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (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 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (*.f64 (neg.f64 (*.f64 (neg.f64 a2) #s(approx (cos th) #s(literal 1 binary64)))) a2) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (/.f64 (neg.f64 (*.f64 (neg.f64 #s(approx (cos th) #s(literal 1 binary64))) (*.f64 a2 a2))) (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) #s(literal 6369051672525773/4503599627370496 binary64))
(*.f64 #s(literal -6369051672525773/4503599627370496 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th)))
(*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (neg.f64 (neg.f64 (neg.f64 (cos.f64 th)))))
(/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (neg.f64 (cos.f64 th)))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))
(/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (neg.f64 (neg.f64 (cos.f64 th))))
(/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))
(neg.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) #s(literal 4503599627370496/6369051672525773 binary64))
(*.f64 (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))
(*.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)) #s(literal 4503599627370496/6369051672525773 binary64))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (cos.f64 th))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal -4503599627370496/6369051672525773 binary64)) (neg.f64 (cos.f64 th)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 a1 a1)) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))
(*.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 a1 a1))) (/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64))))
(*.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 4503599627370496/6369051672525773 binary64))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 (cos.f64 th) #s(literal 1 binary64)))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))
(*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)) (/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))
(*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (/.f64 (cos.f64 th) #s(literal -6369051672525773/4503599627370496 binary64)))
(*.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th)) #s(literal -4503599627370496/6369051672525773 binary64))
(*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 4503599627370496/6369051672525773 binary64))
(*.f64 (cos.f64 th) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64)))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (neg.f64 a2) a2)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 a2 a2)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64))) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (neg.f64 a1) a1)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (neg.f64 a1) a1)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))) (-.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th))))) (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (+.f64 (*.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th))) (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))) (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 (neg.f64 a2) a2))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (neg.f64 a2) a2))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a1) a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 a2 a2))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (neg.f64 a2) a2))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 a2 a2))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 a1 a1))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 a1 a1))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 1 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (*.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (neg.f64 a1) a1))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64))) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 a1 a1))) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))) (neg.f64 (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 a1 a1)))) (neg.f64 (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th)))) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64))) (neg.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(/.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 a1 a1)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))) (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))) (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))))))
(/.f64 (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 a1 a1))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th))) #s(literal 6369051672525773/4503599627370496 binary64))
(/.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th)))
(/.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(/.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th)) #s(literal -6369051672525773/4503599627370496 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 a1 a1))))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 a1 a1)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (neg.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (cos.f64 th)) (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (cos.f64 th))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th)) (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 6369051672525773/4503599627370496 binary64))
(/.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(neg.f64 (*.f64 (-.f64 (*.f64 (neg.f64 a1) a1) (*.f64 a2 a2)) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th))))
(neg.f64 (*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal -4503599627370496/6369051672525773 binary64)))
(-.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 (*.f64 (neg.f64 a2) a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(-.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 (*.f64 a2 a2) (/.f64 #s(literal -6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(-.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 (*.f64 (*.f64 a1 a1) #s(literal -4503599627370496/6369051672525773 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 th))))
(-.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (neg.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))))
(-.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (neg.f64 a1) a1) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th))))
(+.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))
(+.f64 (/.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 a1 a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (*.f64 a2 a2) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64))) (/.f64 (*.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) (*.f64 a1 a1)) (pow.f64 (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)) #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 6369051672525773/4503599627370496 binary64)) (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 6369051672525773/4503599627370496 binary64)))
(+.f64 (/.f64 (*.f64 (cos.f64 th) (*.f64 a2 a2)) #s(literal 6369051672525773/4503599627370496 binary64)) (/.f64 (*.f64 (cos.f64 th) (*.f64 a1 a1)) #s(literal 6369051672525773/4503599627370496 binary64)))
(+.f64 (/.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) #s(literal 6369051672525773/4503599627370496 binary64)) (/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 6369051672525773/4503599627370496 binary64)))
(+.f64 (/.f64 (*.f64 (*.f64 a2 a2) (cos.f64 th)) #s(literal 6369051672525773/4503599627370496 binary64)) (/.f64 (*.f64 (*.f64 a1 a1) (cos.f64 th)) #s(literal 6369051672525773/4503599627370496 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))
(+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (/.f64 (*.f64 (neg.f64 (neg.f64 a1)) a1) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th))))
(+.f64 (*.f64 (*.f64 (*.f64 a2 a2) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)) (*.f64 (*.f64 (*.f64 a1 a1) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th)))

eval186.0ms (3.6%)

Memory
2.1MiB live, 1 496.8MiB allocated; 87ms collecting garbage
Compiler

Compiled 38 405 to 4 410 computations (88.5% saved)

prune76.0ms (1.5%)

Memory
6.7MiB live, 639.3MiB allocated; 17ms collecting garbage
Pruning

32 alts after pruning (29 fresh and 3 done)

PrunedKeptTotal
New1 321171 338
Fresh91221
Picked505
Done-330
Total1 332321 364
Accuracy
100.0%
Counts
1 364 → 32
Alt Table
Click to see full alt table
StatusAccuracyProgram
66.8%
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
67.1%
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(approx (cos th) #s(literal 1 binary64))) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
67.1%
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
67.4%
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) #s(literal 6369051672525773/4503599627370496 binary64))
67.1%
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) #s(literal 6369051672525773/4503599627370496 binary64))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
99.6%
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))
67.4%
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(approx (/ 6369051672525773/4503599627370496 (cos th)) #s(literal 6369051672525773/4503599627370496 binary64)))
99.6%
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) #s(literal 6369051672525773/4503599627370496 binary64))
66.8%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
66.8%
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
66.8%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
66.8%
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))))
67.4%
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2))
67.3%
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
67.4%
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))
67.3%
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1))
99.2%
(+.f64 (*.f64 #s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
99.5%
(*.f64 (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
99.6%
(*.f64 (/.f64 (cos.f64 th) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
49.2%
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (sqrt.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)))) (*.f64 a1 a1)))
17.3%
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
67.0%
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
54.8%
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)) (*.f64 a1 a1)))
67.1%
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64))))
99.5%
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
99.5%
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))
29.1%
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))
99.5%
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))
99.2%
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1/2 binary64))
67.3%
(*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64))
99.5%
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 4503599627370496/6369051672525773 binary64))
67.3%
(*.f64 #s(approx (/ (cos th) 6369051672525773/4503599627370496) #s(literal 4503599627370496/6369051672525773 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
Compiler

Compiled 690 to 474 computations (31.3% saved)

regimes967.0ms (18.5%)

Memory
-10.7MiB live, 8 609.5MiB allocated; 227ms collecting garbage
Counts
1 → 1
19 → 1
39 → 1
41 → 1
43 → 1
44 → 1
63 → 1
68 → 1
Calls
Call 1
Inputs
(*.f64 #s(approx (/ (cos th) 6369051672525773/4503599627370496) #s(literal 4503599627370496/6369051672525773 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
Outputs
(*.f64 #s(approx (/ (cos th) 6369051672525773/4503599627370496) #s(literal 4503599627370496/6369051672525773 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
Call 2
Inputs
(*.f64 #s(approx (/ (cos th) 6369051672525773/4503599627370496) #s(literal 4503599627370496/6369051672525773 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(approx (/ 6369051672525773/4503599627370496 (cos th)) #s(literal 6369051672525773/4503599627370496 binary64)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(approx (/ (sqrt 2) (cos th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) #s(literal 6369051672525773/4503599627370496 binary64))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) #s(literal 6369051672525773/4503599627370496 binary64))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)) (*.f64 a1 a1)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (neg.f64 a1)) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 #s(literal 6369051672525773/4503599627370496 binary64))) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (neg.f64 #s(literal 6369051672525773/4503599627370496 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 a1 a1)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
Outputs
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(approx (/ 6369051672525773/4503599627370496 (cos th)) #s(literal 6369051672525773/4503599627370496 binary64)))
Call 3
Inputs
(*.f64 #s(approx (/ (cos th) 6369051672525773/4503599627370496) #s(literal 4503599627370496/6369051672525773 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(approx (/ 6369051672525773/4503599627370496 (cos th)) #s(literal 6369051672525773/4503599627370496 binary64)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(approx (/ (sqrt 2) (cos th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) #s(literal 6369051672525773/4503599627370496 binary64))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) #s(literal 6369051672525773/4503599627370496 binary64))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)) (*.f64 a1 a1)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (neg.f64 a1)) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 #s(literal 6369051672525773/4503599627370496 binary64))) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (neg.f64 #s(literal 6369051672525773/4503599627370496 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 a1 a1)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (sqrt.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)))) (*.f64 a1 a1)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(approx (cos th) #s(literal 1 binary64))) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))
Outputs
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2))
Call 4
Inputs
(*.f64 #s(approx (/ (cos th) 6369051672525773/4503599627370496) #s(literal 4503599627370496/6369051672525773 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(approx (/ 6369051672525773/4503599627370496 (cos th)) #s(literal 6369051672525773/4503599627370496 binary64)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(approx (/ (sqrt 2) (cos th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) #s(literal 6369051672525773/4503599627370496 binary64))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) #s(literal 6369051672525773/4503599627370496 binary64))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)) (*.f64 a1 a1)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (neg.f64 a1)) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 #s(literal 6369051672525773/4503599627370496 binary64))) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (neg.f64 #s(literal 6369051672525773/4503599627370496 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 a1 a1)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (sqrt.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)))) (*.f64 a1 a1)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(approx (cos th) #s(literal 1 binary64))) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 4503599627370496/6369051672525773 binary64))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))
Outputs
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 4503599627370496/6369051672525773 binary64))
Call 5
Inputs
(*.f64 #s(approx (/ (cos th) 6369051672525773/4503599627370496) #s(literal 4503599627370496/6369051672525773 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(approx (/ 6369051672525773/4503599627370496 (cos th)) #s(literal 6369051672525773/4503599627370496 binary64)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(approx (/ (sqrt 2) (cos th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) #s(literal 6369051672525773/4503599627370496 binary64))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) #s(literal 6369051672525773/4503599627370496 binary64))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)) (*.f64 a1 a1)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (neg.f64 a1)) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 #s(literal 6369051672525773/4503599627370496 binary64))) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (neg.f64 #s(literal 6369051672525773/4503599627370496 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 a1 a1)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (sqrt.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)))) (*.f64 a1 a1)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(approx (cos th) #s(literal 1 binary64))) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 4503599627370496/6369051672525773 binary64))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64))))
Outputs
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))
Call 6
Inputs
(*.f64 #s(approx (/ (cos th) 6369051672525773/4503599627370496) #s(literal 4503599627370496/6369051672525773 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(approx (/ 6369051672525773/4503599627370496 (cos th)) #s(literal 6369051672525773/4503599627370496 binary64)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(approx (/ (sqrt 2) (cos th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) #s(literal 6369051672525773/4503599627370496 binary64))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) #s(literal 6369051672525773/4503599627370496 binary64))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)) (*.f64 a1 a1)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (neg.f64 a1)) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 #s(literal 6369051672525773/4503599627370496 binary64))) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (neg.f64 #s(literal 6369051672525773/4503599627370496 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 a1 a1)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (sqrt.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)))) (*.f64 a1 a1)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(approx (cos th) #s(literal 1 binary64))) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 4503599627370496/6369051672525773 binary64))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
Outputs
(*.f64 (/.f64 (cos.f64 th) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
Call 7
Inputs
(*.f64 #s(approx (/ (cos th) 6369051672525773/4503599627370496) #s(literal 4503599627370496/6369051672525773 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(approx (/ 6369051672525773/4503599627370496 (cos th)) #s(literal 6369051672525773/4503599627370496 binary64)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(approx (/ (sqrt 2) (cos th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) #s(literal 6369051672525773/4503599627370496 binary64))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) #s(literal 6369051672525773/4503599627370496 binary64))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)) (*.f64 a1 a1)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (neg.f64 a1)) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 #s(literal 6369051672525773/4503599627370496 binary64))) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (neg.f64 #s(literal 6369051672525773/4503599627370496 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 a1 a1)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (sqrt.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)))) (*.f64 a1 a1)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(approx (cos th) #s(literal 1 binary64))) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 4503599627370496/6369051672525773 binary64))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) #s(literal 6369051672525773/4503599627370496 binary64))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (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))) (cos.f64 th))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(*.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(+.f64 (*.f64 #s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(*.f64 (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 #s(literal 6369051672525773/4503599627370496 binary64))) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
Outputs
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) #s(literal 6369051672525773/4503599627370496 binary64))
Call 8
Inputs
(*.f64 #s(approx (/ (cos th) 6369051672525773/4503599627370496) #s(literal 4503599627370496/6369051672525773 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(approx (/ 6369051672525773/4503599627370496 (cos th)) #s(literal 6369051672525773/4503599627370496 binary64)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 4503599627370496/6369051672525773 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) #s(approx (/ (sqrt 2) (cos th)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))) #s(literal -1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) #s(literal 6369051672525773/4503599627370496 binary64))) #s(literal 40564819207303346393761349247529/20282409603651670423947251286016 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) #s(approx (cos th) #s(literal 1 binary64))) a1) a1) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2)) #s(literal 6369051672525773/4503599627370496 binary64))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)) (*.f64 a1 a1)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (neg.f64 a1)) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (*.f64 a2 a2)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 #s(literal 6369051672525773/4503599627370496 binary64))) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (neg.f64 #s(literal 6369051672525773/4503599627370496 binary64))))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2))) (*.f64 a1 a1)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 a2 a2) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) a2))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a1)) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (neg.f64 a2)) (neg.f64 a2)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(+.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))) (neg.f64 (*.f64 a1 (sqrt.f64 #s(literal 2 binary64))))) #s(literal 2 binary64)))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (neg.f64 a1) #s(approx (cos th) #s(literal 1 binary64))))) (neg.f64 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)) (*.f64 (*.f64 a1 a1) (*.f64 a1 a1))) (-.f64 (*.f64 a2 a2) (*.f64 a1 a1))))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (*.f64 (*.f64 a1 a1) (*.f64 a1 a1)))) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
(+.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (*.f64 (*.f64 a2 a2) (*.f64 a2 a2)))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (sqrt.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 (*.f64 a2 a2) a2) a2) (*.f64 (*.f64 (*.f64 a2 a2) a2) a2)))) (*.f64 a1 a1)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (/.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))))
(/.f64 (-.f64 (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1)) a1) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) a2) #s(approx (cos th) #s(literal 1 binary64))) a2)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) a2) (*.f64 (*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) #s(literal 6369051672525773/4503599627370496 binary64)) #s(approx (+ (* a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a2) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(approx (cos th) #s(literal 1 binary64)) a1) a1)) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (cos.f64 th) (+.f64 (*.f64 a1 a1) (*.f64 a2 a2))) #s(literal 4503599627370496/6369051672525773 binary64))
(*.f64 (*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) #s(literal 4503599627370496/6369051672525773 binary64)) (cos.f64 th))
(*.f64 (+.f64 (*.f64 a1 a1) (*.f64 a2 a2)) (*.f64 #s(literal 4503599627370496/6369051672525773 binary64) (cos.f64 th)))
(*.f64 (/.f64 #s(approx (cos th) #s(literal 1 binary64)) (sqrt.f64 #s(literal 2 binary64))) #s(approx (+ (* a2 a2) (* a1 a1)) (pow.f64 a2 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) #s(literal 6369051672525773/4503599627370496 binary64)) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) #s(literal 6369051672525773/4503599627370496 binary64))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (cos.f64 th)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 th) (/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (/.f64 (cos.f64 th) (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))) (cos.f64 th))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th)) (sqrt.f64 #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(*.f64 (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th))
(/.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (cos.f64 th))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)) (cos.f64 th))))
(+.f64 (*.f64 #s(approx (/ (cos th) (sqrt 2)) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
(*.f64 (/.f64 (cos.f64 th) (*.f64 (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 a2 a2) (*.f64 a1 a1)))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (*.f64 a1 #s(literal 6369051672525773/4503599627370496 binary64))) (*.f64 #s(literal 6369051672525773/4503599627370496 binary64) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(+.f64 (*.f64 (*.f64 a2 (cos.f64 th)) (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))))
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (/.f64 a2 (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 (*.f64 a1 (cos.f64 th)) (*.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 a2 (cos.f64 th)) (neg.f64 a2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (neg.f64 a1)) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 a2 (cos.f64 th)) a2))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 a1 (cos.f64 th)) (/.f64 a1 (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 a2 (cos.f64 th)) a2)) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
Outputs
(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (*.f64 a2 (/.f64 a2 (sqrt.f64 #s(literal 2 binary64)))) (cos.f64 th)))
Calls

64 calls:

32.0ms
(*.f64 a1 a1)
32.0ms
a1
25.0ms
a2
24.0ms
a2
24.0ms
(*.f64 a1 a1)
Results
AccuracySegmentsBranch
67.3%1(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
67.3%1(*.f64 a1 a1)
67.3%1(cos.f64 th)
67.3%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
67.3%1a1
67.3%1th
67.3%1(*.f64 a2 a2)
67.3%1a2
67.4%1(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
67.4%1(cos.f64 th)
67.4%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
67.4%1a1
67.4%1(*.f64 a1 a1)
67.4%1th
67.4%1(*.f64 a2 a2)
67.4%1a2
67.4%1(*.f64 a2 a2)
67.4%1(*.f64 a1 a1)
67.4%1(cos.f64 th)
67.4%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
67.4%1(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
67.4%1a1
67.4%1a2
67.4%1th
99.5%1(*.f64 a2 a2)
99.5%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.5%1a2
99.5%1(*.f64 a1 a1)
99.5%1(cos.f64 th)
99.5%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
99.5%1a1
99.5%1th
99.5%1(*.f64 a2 a2)
99.5%1(*.f64 a1 a1)
99.5%1(cos.f64 th)
99.5%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
99.5%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.5%1a1
99.5%1a2
99.5%1th
99.6%1(*.f64 a2 a2)
99.6%1(*.f64 a1 a1)
99.6%1(cos.f64 th)
99.6%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
99.6%1(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
99.6%1a1
99.6%1a2
99.6%1th
99.6%1(*.f64 a2 a2)
99.6%1(*.f64 a1 a1)
99.6%1(cos.f64 th)
99.6%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
99.6%1(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
99.6%1a1
99.6%1a2
99.6%1th
99.6%1(*.f64 a2 a2)
99.6%1(*.f64 a1 a1)
99.6%1(cos.f64 th)
99.6%1(/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64)))
99.6%1(+.f64 (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a1 a1)) (*.f64 (/.f64 (cos.f64 th) (sqrt.f64 #s(literal 2 binary64))) (*.f64 a2 a2)))
99.6%1a1
99.6%1a2
99.6%1th
Compiler

Compiled 1 674 to 563 computations (66.4% saved)

derivations104.0ms (2.0%)

Memory
36.3MiB live, 427.3MiB allocated; 9ms collecting garbage
Stop Event
fuel
Compiler

Compiled 118 to 41 computations (65.3% saved)

preprocess242.0ms (4.6%)

Memory
-17.4MiB live, 1 647.1MiB allocated; 49ms collecting garbage
Compiler

Compiled 1 365 to 962 computations (29.5% saved)

end0.0ms (0.0%)

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

Profiling

Loading profile data...